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EPITOmL 


Taking the good news first, the RISC OS upgrade sets, (XHTiplete with manuals and ROMs 
have begun to come through from Acorn, as of ear^ April The not-so^good news is that the 
rate of supply is considerably less than the overwhelmirrg demand for the product. This 
means that if you did not order your upgrade early. It wiy be well into May, and maybe even 
beyond until you receive your upgrade. 

Acorn are using three Japanese suppliers, including Fujitsu and hlitachi, with a combined rate 
of delivery of around 4000 per month. The accompanying discs and manuals are all ready to 
go, and Acorn are shipping the upgrade sets as soon as they receive each ROM delivery. 

As you may have gathered from recant assertions In the computer press (including RISC 
User), and counter denials from Acom, something is brewing at the Cambridge Technopark. 
And announcements about a new RISC machine are expected shortly, though we are not 
permitted to disclose any details about it at this stage. Associated with this new development, 
Acom are releasing a revamped 400 series Archimedes with a much lower entry price. 

The 400/1 series will have two models, the 410 and the 420. Both will run 10% faster than 
previous machines, and will be supplied with 4 internal podute sockets. The 410 will have 
1 Mbyte of RAM upgradable to 2 or 4 Mbytes, afKJ will have a hard disc interface. The 420 
will have 2 Mbytes of RAM upgradable to 4 Mbytes, and will be supplied with an internal 
20 Mbyte hard disc. The ex VAT prices for the two machines will be £1199 and £1699 
respectively. 

Rnalty to much more mundane matters. This issue of RISC User sees a new Technical 
Queries page carrying answers to selected postal queries. If you find this worthwhile, please 
let us know. 


Tb/s morfth's fe/eso/tware password is commando 
(Sao BEBBUG pages on Micronet) 










ARCHIMEDES EXTRAS 

Nearly two years after it was promised, Acorn have 
finally launched the Archimedes 410. Indeed, they have 
also launched a 420 and an updated 440, forming a new 
400 series which many people believe will replace the 
current 305 and 310. The new machines, officially called 
the 410/1,420/1 and 440/1 and the 410/1 and 420/1 are 
fully upgradable to the 440/1 and all include RISC OS as 
standard. The table below summarises the features. 


The prices given are VAT inclusive, and are for frie base 
system. A further £253 should be added for a colour monitor. 

PRICES UP 

To coincide with the launch of the 400/1 series. Acorn 
have announced a price increase for the 310. The base 
price for the 310 rises from £960.25 to £1033.85 (alJ 
prices inc. VAT), with a colour monitor again adding 
another £253. The price of the Master 128 computer also 
rises, to £504.85. However, for the first time, Acorn have 
introduced discounted prices for educational establish¬ 
ments. The recommended price for a 310 is £720 (ex 
VAT). 

BEEBUG will continue to supply Archimedes 
machines at the old price for as long as possibie, and will 
still inciude the package of free extras (see retail cata¬ 
logue for details). Furthermore, BEEBUG will match any 
bona fide deal offered by any Acorn dealer. 

CRYSTAL PRINT 

Those considering purchasing a PostScript compati¬ 
ble laser printer for the Archimedes might like to consider 
the Qume Crystalprint Publisher as an alternative. This is 
not a laser printer, but instead uses a new form of liquid 
crystal shutter in conjunction with a normal light source. 
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The Crystalprint Publisher comes with 3Mbytes of memory 
and 11 built-in fonts, with the option to download more 
when needed. The printer costs £3449 (inc. VAT), which 
may not seem very cheap, but it ts in fact the cheapest 
PostScript printer available. More details from Qume, 
Qume House* Parkway. Newbury, Berkshire RG13 1EE, 
tel. (0635) 523200. 

SERIAL CARD 

Intelligent Interfaces, the company known for mak¬ 
ing specialised hardware add-ons, 
has launched a new serial podule 
for the Archimedes. The single width 
board offers two RS423 ports, both 
of which are fully compatible with 
the one fitted as standard (except 
tor the bugs). Each port offers totally 
independent data format and baud 
rates (75 to 19200). The software supplied in ROM or 
the podule allows the new ports to be accessed by the 
operating system directly. The RS423 podule costs 
£224.25 (inc. VAT). More details from Intelligent 
I n ter faces T 43b Wood Street, Stratford Upon Avon, 
Warwickshire CV37 6JQ* 

LOGIC DESIGN 

For any Archimedes owners wishing to design their 
own hardware, Atom wide has just released a PAL and 
PROM programmer. This allows PROMs (Programmable 
ROMs) and PALs (Programmable Array Logic) to be pro¬ 
grammed from data specified in standard JEDEC files. 
The programmer consists of an Archimedes podule, a 
programming socket, and a power supply. The whole 
setup costs £199 (inc, VAT) and should prove very use¬ 
ful for developers wishing to design their own 
Archimedes podules. More details from Atomwide Ltd., 
23 The Greenway, Orpington, Kent 8R2 2AY, tel. (0669) 
36852. 

MULTI-PIN PRINTING 

Epson has launched the world's first 48-pin dot matrix 
printer. The TLQ4800, as it is called, offers a printing 
speed of 250 characters per second, two letter quality 
fonts, a wide range of type styles, and full programmability 
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via the control panel Epson says that the TLQ4600 offera 
as good a quality as a laser printer, but at £2528.85 {inc. 
VAT) it should do. More details from Epson UK, Campi^ 
100, Maryland Avenue, Hemel Hempstead, Hertfordshire 
HP2 7EZ. 

SHOW STORIES 

It now appears certain that there will not be a Micro 
User show in London this year. Therefore, the only 
Acorn specific exhibition this year will be the Acorn User 
show at Alexandra Palace from the 21st to the 23rd of 
July. BEEBUG and RISC User will be there on stand 55. 

DOUBLE SAMPLES 

Armadillo Systems have launched an enhanced ver¬ 
sion of their Armadillo sound sampler. The new device 
offers sixteen-bit sampling, whch gives a dynamic rartge 
comparable to that of a compact disc. This new sampler 
is supplied with a software package called HighWote, 
which Armadillo claims is designed to make the profes¬ 
sional musician feel at home with the computer. The 
whoEe package costs £1360 {inc. VAT), with much of this 
cost being attributed to the analogue to digital converter 
chip. 

Armadillo has also extended its range of eighLbit 
samplers to indude stereo and MIDI (Musical Instrument 
Digital Interface) versions. The eight-btt range starts at 
£155.25, More details can be obtained from Armadillo 
Systems Ltd., 17 Giaston Road, Uppingham, 
Leicestershire LE15 9PX, tel. (0572) 822499. 

MAKING AN IMPRESSION 

The long awaited desktop publishing (DTP) package 
form Computer Concepts is set to be released in June. 
The system, called Impression, is designed to create a 
complete page from start to finish. This means that the 
package can be used as a word processor to enter and 
edit text, and as a page layout system to adjust the final 
^pearance of the page. Impression will cost around 
£150, and details of availability can be obtained from 
Computer Concepts, Gaddesden PlaceT Hemel 
Hempstead, Hertfordshire HP2 6EX. 


IMAGE PROCESSING 

The Hawk V10. from Wild Vision, is a professional 
image processing system for the Archimedes. The system 
consists of a full-width podule (pictured) which can cap¬ 
ture up to four separate images in 258 grey shades, with 
a resolution of 256 by 256. to fifty frames a second 
may be grabbed, giving a continuous smooth display, and 
colour images can be handled by grabbing the red, green 
and blue components separate^. Unlike other systems, 
the images are stored in memory on the podule, and are 
displayed using a separate monitor. This allows the full 
power of the Archimedes to be used for processing the 
images In real-time. The sample software supplied with 
the system provides a number of image processing func¬ 
tions, including a Convolver to enhance the focus of an 
image. The Hawk VI0 starts from £747.50 (inc. VAT). 
More details from Wild Vision Ltd., 6 Jesmond Road, 
Newcastle Upon Tyne NE2 4PQ, tel, 091-281 8431. 



Howk vIO expansfon cord 


WORLD DEVELOPMENT DATABASE 

Geoscan, written by Limmasol Grammar School is a 
learning resource for the GCSE exams in Geography and 
Econonics. Geoscan offers a database covering location- 
al, dimatic, physical and socio-economic information on 
over 100 countries. Students can retrieve the information 
in a variety of forms, including diagrams and graphs. A 
number of statistical operations can also be performed on 
the data, allowing comparisons to be made between 
countries. Geoscan costs £45 (inc. VAT), and Is available 
from Passkey Marketing, PO Box 649, Shenley Lodge. 
Milton Keynes MK57AX. 
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RENDER BENDER 


David Spencer looks at Clares' new 3D ray tracing package. 


Anyone who experimented with Roger 
Wilson's ray tracing program from last month's 
RISC User will appreciate how powerful a tech¬ 
nique It is. However* modifying the program for 
different Images is far from simple. Render 
Bender from Clares is a new package designed 
to take the pain out of ray tracing and enable 
advanced effects to be achieved with relative 
ease. For anyone who did not read fast month's 
article, ray tracing Is basically a brute force 
technique for determining the appearance of a 
3D image made up of solid objects. The tech¬ 
nique works by considering every pixel on the 
screen, and conceptually tracing rays of light 
back around all the objects until they reach the 
original light source. 

CREATING A SCENE 

Before continuing, I must make one thing 
clear - Render Bender is not, and does not 
claim to be, a drawing or painting package. In 
fact, Render Bender offers no facilities for inter¬ 
actively editing a picture on screen. Instead, 
Render Bender is designed solely for the cre¬ 
ation and animation of scenes consisting of 
geometric objects. 

The process of creating and displaying an 
animated sequence consists of several stages: 

1. The objects making up the scene are 
defined using a special programming language, 
together with the changes from frame to frame 
(if any) to produce an animated sequence. 

2. The text description of the scene is com¬ 
piled into Render Bender's internal format. 

3. The individual frames are ray traced 
according to a number of options which may be 
set up. 

4. The resultant frames are compressed 
using a deltaflle method, and a display program 
incorporated 

6. Finally, the completed sequence is dis¬ 
played. 

RUNNING RENDER BENDER 

When you start the Render Bender disc you 
are presented with a very swish title screen 
consisting of a rotating gold coin. This gives 


way to an equally impressive selection screen 
which allows you to choose between the editor 
and ray tracer program, or the deltafile anima¬ 
tor. Both of these screens were created using 
the package itseli 


Render Bender 


Render Bender menu screen 

The stages of producing an anirt^ation 
sequence are performed by two Independent 
parts of the program, linked by a selection 
screen. The first of these is the editor and ray 
tracer. This allows you to create a scene with 
the scene description language, and ray trace it 
to create a number of frames. 

THE SCENE DESCRIPTION LANGUAGE 

The scene description language is the key 
to creating a picture. The format is entirely text- 
based, and consists of a series of keywords fol¬ 
lowed by a number of qualifiers and parame¬ 
ters. all of which must be separated by com¬ 
mas. There are basically three types of com¬ 
mands, these being used to position light 
sources, the viewer, and any objects. Afl posi¬ 
tions are specified in 3-space as X, Y and Z co¬ 
ordinates, with the origin effectively at the cen¬ 
tre of the image. The view point for the scene is 
given by the viewer's position, and either the 
point they are looking at or the direction they 
are looking in. There are three possible types of 
light source - a ray, a point source, and a spot¬ 
light, and these can be mixed at will in a scene. 
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Sample roy-traced imoge 


For a spotlight you can control not only the 
direction of the beam^ but also the angle 
through which it spreads. Objects in the scene 
can be chosen from pyramids, boxes, tubes, 
discs spheres and polygons, and are specified 
in terms of their position, dimensions and orien¬ 
tation. Additionally, each object can be given a 
colour, and a surface attribute which deter¬ 
mines whether the it is Shiny, mirror-like, metah 
lie, opaque or bulb-tike. (A bulb appears brilliant 
white, regardless of the light falling on it). 

Animation is achieved by incorporating vari¬ 
ables in the definitions. The ray tracer will auto¬ 
matically update these variables in the speci¬ 
fied way between frames. 

Once a scene description has been written, 
it has to be compiled from within the editor. 
This only takes a few second, and then the 
scene is ready to be ray traced. Before this Is 
done, a number of parameters need to be set 
up. For example, you can change the floor pat¬ 
tern, floor scaling, sky colour, viewing lens, 
opacity of opaque objects, the refractive index 
of objects that transmit light, and shadowing. 
You can also select whether to ray trace in 
mode 13 or 15, and whether to scale the pic¬ 
ture for a faster preview. The actual ray tracing 
can be quite time consuming. For a complex, 
full screen image in mode 15 with shadowing, it 
can take about an hour a frame. In other words, 
a fifty frame sequence could take two days! 


RENDER BENDER 

A single ray traced picture can be exported 
directly from the ray tracer. However, an anima¬ 
tion sequence must be processed by the 
deltafile animator. This part of Render Bender 
takes a sequence of picture files, and com¬ 
presses them to produce a final sequence file. 
The order rn which the frames are displayed is 
also determined at this point. The final 
sequence can either be displayed directly from 
within Render Bender, or saved and played 
back separately using a simple Basic program. 

PRESENTATION 

Render Bender is supplied in an A4 size 
opening box, with the two discs slotted into the 
inside cover, and the manual recessed into the 
box. The box is printed in full colour and is very 
eye catching. This is a major departure from 
the Video case' style box previously used by 
Clares, which I personally thought was always 
very drab. Also gone are the familiar Clares' 
disc labels, which have now been replaced by a 
more attractive design. My only quibble about 
the new presentation is that the review copy 
arrived somewhat squashed. Hopefully, Clares 
will improve their packaging to prevent this. 

DOCUMENTATION 

The Render Bender manual has not 
escaped Clares revamp either. It is an A5 sized 
book, about 80 pages long, and printed on high 
quality paper with glossy full colour covers. The 
cheap looking plastic comb binding has been 
replaced with genuine Wire-O binding. Ths 
manual is properly typeset, and Is laid out in 
such a way as to make it very impressive and 
easy to read. There are plenty of clear illustra¬ 
tions, and several direct screen dumps. 

The manual starts off with a brief overview 
of the package and the principle of ray tracing, 
and then continues with an exhaustive explana¬ 
tion of how to start Render Bender and how to 
install it onto a hard disc. Render Bender is fully 
RISC OS compatible, and instructions are 
given for starting it from the Desktop. 

The next section covers the use of the 
Editor and Ray tracer. This is presented in such 
a way that a first-time user can get the system 


RISC User May 1989 


7 






RENDER BENDER 





Up and running without getting bogged down in 
all the various controls. The final main section 
covers the Animator, and is again easy to fol¬ 
low for the first-time user This section also 
explains how to display animated sequences 
without Render Bender being present, and how 
to use the Animator to animate screens gener¬ 
ated by other packages. 

Two appendices explain the syntax of the 
all-important scene description language, and 
any possible errors that may occur while run¬ 
ning Render Bender. The manual is rounded off 
with a comprehensive index. The only fault I 
could find with the manual ts the lack of a 
detailed explanation of ray tracing. Admittedly, 
it does point out that this would require an 
entire book, but Clares could still have recom¬ 
mended one. Personaffy, I like the book sug¬ 
gested last month. 

CONCLUSION 

Clares have once again come up with a pro¬ 
fessional product, and also one which does not 


suffer from the problem of highly graphical, but 
totally confusing, icons - a criticism of Clares' 
products in the pash There is no doubt that 
Render Bender is excellent at performing its 
function, and is a very well thought out pack¬ 
age. It errsures that all that is needed to pro¬ 
duce stunning animations is a good imagina¬ 
tion. But what use is it? The Archimedes has 
now been around for nearly two years, and the 
thrills of stunning images and animation 
sequences are, I feel, rapidly subsiding. I don't 
think many people will buy Render Bender just 
to draw pretty pictures and sit looking at them 
for hours, especially at £80. 


Product: 

Reoder Bender 

Supplier; 

Clares Micro Supplies, 


9B Middlewich Road, 


Rudheoth, Northwich, 


Cheshire CW9 7DA. 


Tel. <0606)43512 

Pfice: 

£79*95 irK^lusive 


This month^s magazine disc contains some sam¬ 
ple frames produced using Render Bender on 


ARCHIMEDES SOFTWARE 

• Disc 1 ElVlACS, High powered editor with built in language. 

• Disc 2 (Vlicrospell, 43.000 word spelling checker for EMACS or sta^^dalon© use. 

• Disc 3 Fortune Cookie over 7,000 amusing quotations. 

m Disc 4 XLISP. Object oriented version of LISP with C source. 

• Disc 5 C Toolkit. Over 20 programs grep, awk, sed, ed, make, fail, cross ref. pretty print. 

• Disc 6 Kermlt, Archimedes, BBC & MSDOS versions of file transfer prog. 

• Disc 7 WIMP chess. Good standard wimp based chess program with lots of feotures. 

• Disc 8 Cross Star. Wimp based crossword solver with huge dictionary, 

• Disc 9 Fite Tools ore. compress, uuencode. cut. paste, fgrep. rotote, strings. 

• Disc 10 More C Tools, yacc and lex with examples and C source, dlff. ctogs etc. 

• Disc 11 Little SmallTalk. Nice implementotlon of the original object oriented 

language. Includes C source, SmallTalk code and documentation. 

• Disc 12 The World Digitised. 130,000 coordfnotes of points on the Earth. 

• Disc 13 Birdfog, Database and statistics pockoge for birdwatchers. 

• Disc 14 Gnu Tools# 1, High quality UNIX tools with C source, egrep. grep, awk. dlff, sed. 

• Disc 15 Clip Art#l. Over 60 pictures to paste into DTP/ArcDrow etc files, 

Eaah disc is £5.99 inc. Buy four claim one free! 

David Pilling, P.O. Box 22, Thornton Cleveleys, Blackpool. FY5 VLR 

No surcharge on overseas orders. More details available on request 
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A PARTIAL RENUMBER UTILITY 


David Spencer offers a utility to tidy up your Basic programs* 


One vei 7 useful function that is not even 
possible using the Basic Editor is to be able to 
renumber only part of a Basic program. For 
example, you may wish to open a gap in the 
program to insert a few extra lines, or you may 
have adopted a numbering scheme where, say. 
each procedure started at a line which was a 
multiple of 1000. The machine code utility given 
here implements just such a renumber. 

Start by entering the program given in the 
listing, and save it to disc. Running it will 
assemble a machine code utility (Arc utilities 
are discussed elsewhere in this issue), and 
save it with the filename 'Renumber*. 

COMMAND SYNTAX 

The Renumber command can be used in 
one of three forms: 

*Renumber “Help 

^Renumber -Check [-Start 
(-End <lnuni>l 

* Re number [-NoCortfirm] [-Start 
<lnuin>] [-End <lnum>J [-First <inum>l 
[-Increment <lnum>l 

Any of the parameters enclosed in square 
brackets may be omitted, in which case various 
defaults will be assumed, these being detailed 
later It is also normally possible to omit the 
keywords (for example putting 12000 instead of 
■END 12000). However, the keywords must be 
used when omitting a parameter would lead to 
confusion over the meanings of the others. For 
example: 

* Renumber 10 TOO 1 
would be the same as: 

*Renumber -Start 10 -End 100 -First 1 
Had it been intended that the '1' was the 
Increment, the 'First' parameter having been 
omitted, then the correct form would be: 

*Renumber 10 100 -Increment 1 
In any case, all the keywords can be abbreviat¬ 
ed to just the first letter, so the above command 
would become: 

*Renumber 10 100 -I 1 

Incidentally, whenever a numeric parameter 
is required, an expression yielding a numeric 
result can be used instead. 
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USING THE COMMANDS 

The first form of the command will simply 
print the syntax and exit immediately: 

*Renumber -Help 

The second form of the command will check 
that the line numbers of a program are in 
sequence. This is because by using a partial 
renumber, it is possible to end up with a situa¬ 
tion where one line has a line number equal to, 
or less than, the previous line. This will not nor* 
mally affect the execution of a program, but will 
confuse commands which operate on a range 
of lines {for example LIST and DELETE). By 
using: 

^Renumber -Check 

all discrepancies in the line sequencing will be 
displayed in the form: 

XXXX - yyyy 

where xxxx is the first line number, and yyyy is 
the second. By specifying start and end line 
numbers, the check can be restricted to just a 
part of the program, for example: 

*RerLumber -Check 100 1000 
If the start tine number is omitted, the first line 
of the program is assumed, and if the end is 
omitted, the last line is assumed. It the speci¬ 
fied lines do not exist, then the numbers are 
treated in the same way as for LIST. 

The third form of the command is the one 
actually used for renumbering. As shown in the 
syntax above, there can be up to five parame¬ 
ters. The first of these is an optional qualifier 
(“NoConfirm), and controls what action is taken 
when renumbering would result in out of 
sequence line numbers occurring. If the qualifi¬ 
er is not given, then you are asked to confirm 
that you don't mind out of sequence numbers. 
On the other hand, if the qualifier is given then 
no confirmation is sought, although a warning 
will be given. The second and third parameters 
specify the start and end of the range to be 
renumbered, as above. The fourth parameter is 
the starting line number for the new numbering, 
and the final one is the increment to be used 
when renumbering. Both these default to ten if 
omitted. 
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The lolJowing examples should make the 
syntax clearer; 

*RENUMBER 

Renumber whole program starting at line ten, in 
increments of ten (just as with Basic's RENUM¬ 
BER). 

’^RENUMBER 100 200 1000 

Renumber lines between 100 and 200. Start at 
1000 and increase in increments of 10. 

^RENUMBER -NoConfim lOO 200 1000 50 
As above, but use an increment of 50. 
Additionally, don't seek confirmation it out of 
sequence numbers result. 

^RENUMBER 80 -First 100 

Renumber all lines from line 80 to the end of 
the program to start at 100, and increase in 
increments of 10. 

^RENUMBER -First 100 -Increment 25 
Renumber the entire program to start at line 
100, and increase in increments of 25. 

*RENUMBER -End 999 -First 1 -Increment 2 
Renumber all the lines up to line 999 to start at 
line 1 and go up in increments of 2. 

10 REM > RenumSrc 

20 REM Program Partial Renumber 

30 REM Version A 1.00 

40 REM Author David Spencer 

50 REM RISC User May 1989 

60 REM Program Subject to Copyright 

70 ; 

SO DIM code 2000 
90 FOR pass-0 TO 3 STEP 3 
100 P%=code 
110 [OPT pass 
120 STMFD R13!,{R1,R14) 

130 MOV RO,|15:MOV Rl^lO 
140 SWI "OSChangeEnvironment" 

150 MOV R6,R1:M0V R0,#18 

160 ADR Rl,basic:SWI "OS_Module" 

170 CMP R6,R3;BCC notbasic 
180 LDR RO,fR3f#-41:ADD R3,R3,R0 
190 CMP R6,R3:BCC getparam 
200 .notbasic ADR R0,nberr 
210 LDMFD R13E,{R1,R14} 


220 ORRS FC,R14|#1«28 

230 .getparam LDMFD R13!,{R1} 

240 ADR R0,defn:MOV R2,R12;M0V R3,ilOO 
250 SWI "XOS^ReadArgs" 

260 LDMVSFD R13!,(PC) 

270 LDR RO, (R12J rCtff ROJO 

260 ADRNE RO,help;SWINE "OS_WriteO" 

290 LDMNEFD R13!,{PC}^ 

300 MOV RO J&8F00:LORB RO, [ROJl] 

310 CMP R0jfiFF;ADREQ R0,noprog 
320 LDMEQFD Rl3t,fR14} 

330 ORREQS PC,Rl4jl«2e 
340 BL getrangeiLDR RO, [R12J41 
350 CMP R0J0:BEQ renumber 
360 .seq LDRB R2, [R7J1] 

370 LDRB Rl, [R7] :ADD Rl,R2,Ri,LSL U 
360 LDRB R2, [R7J21 ;ADD R7,R7,R2 
390 LDRB R3, [R71 ;LDRB R4, [R7J1] 

400 ADD R3,R4,R3,LSL #8 

410 CMP R1,R3:BCC seqok 

420 MOV R0,Rl:MOV R1J1:BL prtnum 

430 SWI &120:SWI SlOOtASC"-”;SWI Sl20 

440 MOV RO,R3:MOV R1J0:BL prtnum 

450 SWI '^03_KewLine" 

460 .seqok CMP R7,R8:BNE seq 
470 LDMFD R13 ! JPC)^ 

480 : 

490 .renumber 

500 LDR R6,[Rl2,f8]:MOV R9,R5 
510 BL candg;LDR R0JR12JS14] 

520 CMP ROJO:MOVEQ R3J10 

530 BLNE gnum;MOVNE R3,R0 

540 LDR RO, [R12J&18J :CMP ROJO 

550 MOVEQ R4,n0:BLNE gnum:MOVNE R4,R0 

560 CMN R9,#1:BEQ nof 

570 CMP R9,R3:BCS badseq 

580 .nof MOV RO,R7:MOV R9,R3 

590 .SChk LDRB Rl,[R0,#21 

600 ADD R0,R0,R1;CMP R0,R8 

610 ADDNE R9,R9,R4:BNE SChk 

620 LDRB Rl,[RO,#11:LDRE R2,[RO] 

630 ADD R1,R1,R2,LSL #8 
640 CMP R9,R1;BCC renum 
650 .badseq CMP R6J0:ADRNE R0,warn 
660 SWINE "OS_WriteO":BNE renum 
670 ADR R0,query:SWI "OSWriteO" 

680 MOV ROJ15:MOV R1J1:SWI "OS_Byte" 
690 SWI "X0S_ReadC";LDMV3ED RISIJPC} 
700 Moves HOJASC"N":BIC RO,RO,flfi20 
710 CMP ROJASC"Y":MOVNE R0JASC*'N" 


RISC User May 1969 


10 













/ NOW 
AVAILABLE 


We offer 
a unique 
inspection 
copy service 


Call for 
full details 


Have you 

spent long hours struggling 

A/\xh the programming complexities of the brilliant^^^ 
^ Archimedes WIMPS system? 

With ARCHWAV that^s all behind you. Now YOU can easily and quickly 
build multi-window programs with pop-up menusj iconsj mouse control, 
etc. of a professional quality. 

ARCHWAY provides tools, bricks, mortar and a basic structure, YOU slot 
the final bricks into place and add finishing touches. 

A comprehensive suite of integrated tools lets you define and edit 
windows, menus, icons, dialogue bo)ces, mouse pointers, sprites, fill and 
line patterns, anti-aliased fonts, short cut keys and much more! You can 
import files (eg ARM machine code and music editor). 

The bricks include an extensive library of functions and procedures 
providing ready access to many of Archimedes^ most powerful features. 
An in-depth user guide (300+ pages, ring bound) takes you gently step- 
by-step through a progressive series of program burfding examples with 
the emphasis on clarity. 

The ARCHWAY run-time package together with £ 79.95 

script shells in BBC BASIC provide the structure. incl. VAT & p/p 

The complete system comes on 4*800k discs (3 tools & 1 run-time). You 
need 1M of RAM to run the tools. One disc drive is sufficient. 

SPECIAL INTRODUCTORY OFFER: No charge for upgrade to the 
extended RISC OS 2.0 version we will release In May 1989. (£99,95) 


4 CLARENCE DRIVE, EAST GRINSTEAD, 

WEST SUSSEX RH19 4RZ Telephone (0342) 328188 


Cheques/POs/official orders or Access/Visa number and 
expiry date. 24-hour 'phone for Credit Card orders. 
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RISC OS provides the user with a powerful set or new sprite commands, 
as Lee Colcroft explains. 

If you have seen the RISC OS Magnifying &2000 (8K) in size, as described in the article 

Glass in operation, then you will have seen referred to above. The first of the two OS calls 

something of the power of the new sprite calls loads a sprite file called "ICONS.Music" (sup- 

avaifable in RISC OS. The two that I am going plied on the Arthur Welcome disc) into the area, 

to look at here allow you to scale a sprite up or and the second plots one of the sprites (called 
down (as used by the Magnifying Glass "Treble") from this file at co-ordinates 640, 512, 
demonstration), and to send VDU output direct- The first numerical parameter in each case is 


ly lo a sprite. By combining the two of these, 
you can produce a scaled output from a pro¬ 
gram within a window of any size. This trick has 
been used from the Desktop to allow Zarch to 
run within a small window. 


35 

Append a sprit© 

36 

Define pointer from sprit© 

50 

Plot scaled sprite mask 

51 

Paint scaled character 

52 

Plot scaled sprite 

53 

Plot grey-scaled sprit© 

60 

Switch VDU output to sprite 

61 

Switch VDU output to mask 

Add 256 to these reason codes for named 

user sprites, or 512 for user sprites accessed 
by address. 


Table 1 The New Sprite Calls 


THE SPRITE CALLS 

All of the new sprite calls use 
"OS_SpriteOp". We took a look at this operating 
system call in Volume 2 Issue 3, when dealing 
with user sprites, and the reader is referred to 
that article for a "refresher" if need be. In what 
follows, 1 will be using the new calls with user 
sprites (since this is most appropriate for multi¬ 
tasking applications), and to start with. I will look 
at the code necessary to set up a sprite area, 
load a sprite file, and plot a sprite from it. Ail this 
can be achieved in just four lines: 

10 DIM sp £2000:!sp=t2000 

20 sp!4=0rsp?8=l6rsp!l2^l6 

30 SYS "OS_SpriteOp",2e6,sp,^'ICONS.Mus 

ic" 

40 SYS "OS_SpriteOp",290,sp,"Treble",6 
40,512 

As you can see, there is not much to it really. 
The first two lines set up a user sprite area of 
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the reason code for the operation, and the sec¬ 
ond the address of the sprite area, again as 
indicated in the previous article. 

In fact the reason code for all sprite opera¬ 
tions has two components, a number between 
0 and 255 indicating the type of operation to be 
performed, plus a high b;^e indicating whether 
user or system sprites are in use, and In the 
former case, whether access is by name or 
address. The reason code to plot a sprite, used 
above, could thus be given as 34 {system 
sprites), 34+256 (named user sprites) or 
34+512 (user sprites accessed by address). 
We have used the value 290 (i.e. 34+256), 
meaning that we are using user sprites, and 
that they will be accessed by name {the name 
"Treble" in this case). In what follows we shall 
continue to use this form of the call, referring to 
named sprites in a user area. 

SCALED SPRITES 

To plot a scaled sprite, we use reason code 
52+256 {i.e. 308), and we must set up four words 
in RAM to define the scale of magnification or 
reduction, and then supply a pointer to this 16- 
byte block in the call itself. The program in listing 
1 achieves this, plotting the ’Treble" sprite at co¬ 
ordinates 100. 100, at a horizontal magnification 
of 8 and a vertical magnification of 6. This is 
achieved using the 4 words of RAM at location 
sca/a The first two numbers give the X and Y 
magnification factor, while the second two give the 
X and Y reduction factors. As you can see, the lat¬ 
ter are currently set to 1. To reduce the horizontal 
size of the sprite by a factor of 2/3, we would use: 

!scale=2 

scale!0=3 

and so on (i.e. multiply by 2 and divide by 3). 
As you will appreciate, this gives us very fine 
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control over the scale factor used for the sprite 
plot, and we can put this call to many uses. For 
example, we could make an image appear as a 
point on the screen, and then grow in size, 
while at the same time moving across the 
screen, by using a simple FOR loop. 

Listing \ 

10 REM >RoslSprt 

20 REM Plot scaled sprite 

30 ; 

40 MODE 12 

50 DIM sp &2000;!sp=S2000 
60 DIM scale 16 
70 spt4=0:sp!8=16^spfl2=l6 
SO SYS "OSSpriteOp",266,sp,"ICONS,Mu 
sic" 

90 SYS "OS_SpriteOp",290,sp,"Treble«, 
640,512,0 
100 : 

110 !scale=8 :REM X multiply 

120 scale!4=6 jREM Y multiply 

130 scale!3=1 :REM X Divide 

140 scale!12=1 :REM Y Divide 

150 SYS "OS_SpriteOp",308,sp,"Treble", 
100,100,0,scale 

VDU OUTPUT TO A SPRITE 

A call to "OS_SpriteOp" with a reason code 
of 60+256 can be used to send all VDU output 
to a named sprite instead of to the screen. The 
sprite can then be displayed as and when 
required, using the calls already treated. The 
program in listing 2 achieves this. It first loads 
the Music sprite file, and plots the sprite named 
"Treble" as before. Next it performs Sprite Op 
316 (i.e. 60+256) setting all VDU output to the 
"Treble" sprite. In practice text and graphics 
windows are set by this call to the size of desti¬ 
nation sprite, with the graphics origin corre¬ 
sponding to the bottom left hand corner of the 
sprite, and screen output is sent to the sprite 
just as if it were a small windowed screen. 

Listing 2 

10 REM >Ros2Sprt 

20 REM VDU output to sprite 

30 : 

40 MODE 12 

50 DIM Sp &2000:!sp=^2000 


60 sp!4=0:spf8=l6:spEl2=i6 
70 r 

80 SYS "OS SpriteOp",266,sp,"ICONS.Mu 
sic" 

90 SYS "OSSpritcOp",290,sp,"Treble", 
640,512,0 

100 J 

110 REM VDU output to sprite 
120 SYS "OSSpriteOp",316,sp,"Treble" 
TO R0,R1,R2,R3 

130 CIRCLE FILL 20,40,16 
140 : 

150 REM Reinstate output 

160 SYS "OS_SpriteOp",RO,Rl,R2,R3 

170 : 

180 REM Plot It again 
190 SYS "OS_SpriteOp",290,Sp,"Treble", 
768,640 


Wr-mwm 14^ 
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Lfsing the two sprite calls to send output 
from a program to a scoled window 


Next the program draws a small filled drcle at 
20,40, which does not appear on the screen, but Is 
sent to the sprite instead. Output is then reinstated 
(Rne 160) ar^ the sprite re-plotted. Sure enough it 
appears with a white disc superimposed upon It. 

To send VDU output to the Treble sprite, we 
have used just 3 parameters: the reason code, 
the pointer to the sprite area, and the sprite 
name, just as before. But now we store the reg¬ 
ister values on exit from the call in the four vari¬ 
ables R0’R3, and these are used to reset VDU 
output after we have finished writing to the 
Sprite. For this we use: 
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These calls have been implemented by Acorn 
with a great deal of care, and a[l VDU variables 
are stored away and later reinstated when the 
calls are made. As a result the user does not 
need to keep track of window settings, origins, 
cursors and so on. It is all taken care of. 
Moreover, the VDU data sent to any sprite is 
given its own VDU queue, so that you can switch 
VDU output to and from sprites at any time. 

To give a practical example of the use of the 
two new sprite calls discussed here, the program 
in listing 3 executes in a scaled window that can 
be altered using the mouse. When you run it you 
will see a small window near the bottom of the 
screen in which randomly coloured circles are 
being drawn. By pressing the Select button on 
the mouse you can move the base position of the 
display window, while pressing Adjust allows you 
to alter its size. All this is accomplished without 
disturbing the drawing process. 

To see how this is achieved, take a look at 
P ROC visuals near the end of the program, and 
you wilt see that the circles are apparently being 
drawn on a full screen. In fact they are drawn 
into a sprite called ""Image", which is then scaled 
and plotted each time around the drawing loop. 
To keep the program short, I have just drawn 
random circles, but PROCvisuals could be 
replaced by a much longer and more interesting 
procedure of your choice. 

The key to the way in which the program 
works is the set of three sprite calls (at lines 
210, 240 and 270) made within the REPEAT 
loop. The first sends VDU output to a sprite 
called "image" which is the size of a full screen. 
The second resets VDU output to normal, and 
the third plots the "Image" sprite suitably scaled. 
As I hope this example shows, experimentation 
with these powerful calls will pay dividends. 

Listing 3 

10 REM >Ros3Sprt 

20 REM Prog rain windowing 

30 ; 

40 MODEl3:OFF:*POINTER 


ine ERL:END 

60 DIM sp &15000:Isp^filSOOO 
70 DIM scale 16 
80 sp! 4=^0: sp f 8^16i sp! 12-16 
90 1 

100 scale!8=1280:scale[12=1024 
110 !scale-320:scale!4-256 
120 xbaEe%=100:ybase^=l00 
130 : 

140 REM Get empty sprite 

150 MOVE 0,0:MOVE 1279,1023 

160 SYS "OS_Spi:iteOp",270, Sp, "image", 1 

170 : 

180 K%=0 
190 REPEAT 

200 REM VDU to sprite 
210 SYS "OS_SpriteOp^,316,Sp,"image" 
TO R0,R1,R2,R3 
220 PROCvisuals 
230 REM Reinstate screen 
240 SYS "OS_SpriteOp"*,RO,Rl,R2,R3 
250 REM Display sprite 
260 WAIT 

270 SYS '’OS_Sprite0p", 303, sp, "image", 
Kbase%,ybase%,0,scale 

280 PRINTTABtlO,5)"Frame number ";N% 
290 PRINTTABfa,7)"Mouse:Move,Quit,Seal 
e" 

300 N%+=1 

310 MOUSE x%,y%,z% 

320 IF z%<>0 THEN 
330 CASE OF 

340 WREN 1;IF x%>xbase% THEN xmult%= 

x%-xbase%: tscale=xmult% 

350 IF y%>ybase% THEN ymult%= 

y%^ybase%: scale! 4=y[nult% 

360 WHEN 4:xbase%=x%:vbase%=y% 

370 ENDCASE 
380 HAITiCLS 
390 ENDIF 
400 UNTIL z%=2 
410 ON:END 
420 : 

430 DEFPROCvisuals 

440 GCOL RND(63) TINT 64*RND^3) 

450 CIRCLE FILL RND(1100),RND(1000), R 
ND (300) 

460 PRINT TAB(6,12)"RANDOM SPHERES IN 
MODE 13" 

470 ENDPROC ^ 
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RiscBASIC 

ARCHIMEDES BASIC V COMPILER 
THE BENCHMARKS 


t BENCHMARK 

tBASICV 

tABC 

tRiscBASlC 

RiscBASIC 

RiscBASIC 

Name 

secs 

secs 

secs 

/ABC 

Ratio 

/BASIC 

V 

Repeat..Until(100000) 

11.15 

1.61 

0.08 

20.1 

1 

139.4 

1 

Whilc..Loop (100000) 

S.70 

1.58 

0.11 

14.4 

1 

79.1 

1 

For.Next (1000000) 

20.64 

15.98 

1.20 

13.3 

1 

17.2 

1 

String AjTay(10000) 

0.99 

1.24 

0.17 

7.3 

1 

5.8 

1 

Integer Array (10000) 

1.45 

0.47 

0.07 

6.7 

1 

20.7 

1 

Real_Anay (10000) 

1.54 

1.52 

0.69 

22 

1 

22* 

1 

Sieve (1651 Primes) 

5.19 

0.52 

0.07 

7.4 

1 

74.1 

1 

Fibonacci 

8.17 

1.30 

0.14 

9.3 

1 

58.4 

1 

Ackerman 

4.53 

0.27 

0.17 

1.6 

1 

26.6 

1 

Grafsem 

1.67 

0.95 

0.80 

1.2 

1 

21 

1 

Textsem 

251 

229 

224 

1.02 

1 

1.1 

1 

Realmath 

0.25 

0.31 

0.26 

1.2 

1 

0.96* 

1 

Triglog 

1.20 

3.42 

3.42 

1.0 

1 

035* 

1 

Intmath 

1.76 

0.37 

0.17 

22 

1 

10.4 

1 


* Using Floadog Point Emulator t All benchmarks have the ESC key enabled for fair comparison 


BASIC V Syntax dk Keywords ADC RiscBASIC 


Full Array Manipulation Operations N Y 

Local Vanables with true scope support N Y 

Multiple entry to FOR, REPEAT... N Y 

Unlimited array sizes & dimensions N Y 

Runtime error handling & reporting N Y 

Full syntax implementation N Y 

SUM N Y 

COUNT N Y 

WIDTH N Y 

EVAL. INSTALL, LIBRARY N N 



RiscBASIC is the first true BASIC V syntax compiler which produces compiled code that 
executes up to 20 times faster than the rival ABC compiler and up to 139 times faster than 
Interpreted BASIC V. The Syntax comparison table also demonstrates the completeness 
of RiscBASIC in implementing all compilable features in the interpreted BASIC V standard 
with only uncompilable features remaining unsupported. 

Additional features include an optimising compiler, register variables for speed, 
relocatable modules, full cross references. Window-based or command line compilation 
environment standalone code generation, in-line assembler with powerful floating point 
mnemonic extensions. Arthur & RiscOS support, comprehensive compiler directives, plus 
free updates for future extensions from a leading Software House renowned for technical 
excellence that makes RiscBASIC the best BASIC V compiler money can buy. 

RiscBASIC: £99,95 Inc VAT & Carriage 
Available from your local dealer or direct by Cheque/Access from 

SILICON VISION LTD, SIGNAL HOUSE, LYON ROAD, HARROW. MIDDX, 

HA1 2AG, Tel: 01-4222274, 01-961 2173, Fax: 01-427 5169, Tbc: 918266. 




UNIVERSAL SCREEN MODE CONVERTER 




David Spencer shows the easy way to convert between modes. 


Tliis program requires RISC OS. 


The simple Basic procedure given here will 
convert a screen image from any mode {other 
than modes 3, 6 or 7), to any other mode. It is 
primarily designed to convert to a mode superi¬ 
or to the current one, that is one with at least as 
high a resolution, and at least as many colours. 
It will however perform any conversion. There 
are numerous uses for such a conversion. For 
example, you might want to edit, say, a mode 
13 screen in an art package which only sup¬ 
ports mode 15. Or, you may need to convert a 
screen to a different mode before it can be 
printed using a particular dump program. 

The listing given here contains both the con¬ 
version procedure, and also a short sample pro¬ 
gram to demonstrate it. This will load a saved 
screen of any mode, and convert it to mode 15. 
You must have a saved screen with the filename 
'Screen' available before running this. 

To use the routine in your own code, you 
merely need to include the definition of 
PROCconvert. and with the screen to be con¬ 
verted displayed, execute: 

PROCconvert(mode) 

where mode is the resulting mode. The conver¬ 
sion takes just a couple of seconds. 

Each time the procedure is called it will claim 
a block of equal to the size of the source screen 
mode. This will not normally cause problems 
because it is likely that the conversion will be 
performed once only. However, it is possible to 
move the DIM statements to outside the proce¬ 
dure, and dimension the block screen to the size 
of the largest screen size that will be converted. 
The procedure can then be called without it 
reclaiming memory. PROCconvert also requires 
the RISC OS Colour Trar\s module to be 
installed. If this is not present, the procedure 
attempts to load it from the ISystem application 
on the RISC OS Appiications /disc (where it nor¬ 
mally resides). This will only work if the ISystem 
application has been 'seen' in a Desktop directo¬ 
ry viewer s^nce the last hard reset. You may wish 
to make a copy of the module onto your working 
disc, and change the pathname at the end of 
line 1010 (after the RMLOAD) to reflect this, 
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COLOURS 

The way in which colours are translated 
depends on whether the screen is being con¬ 
verted to a mode with more or less colours Than 
the current mode. In the case where the 
conversion is to a mode with less colours, each 
colour from the current palette will be mapped 
to the closest colour in the new mode's pafette. 
No attempt is made to redefine the palette. This 
means that the colours used in a picture may 
be changed considerably. On the other hand, if 
the new mode offers more colours (or the same 
number) then its palette is set to the same val¬ 
ues as the source mode. Therefore, the colours 
will be retained exactly. The only exception to 
this is when the new mode has 256 colours. In 
this case the palette is not changed, although 
the large number of available colours mean that 
the conversion can be performed with no 
noticeable change of colour. 

HOW IT WORKS 

The procedure starts by grabbing the source 
screen into a user sprite area, it then calculates 
the size of the source and destination screens, 
and uses the Colour Trans module to perform 
the palette mapping. The screen mode is then 
changed and the sprite replotted using the 
appropriate scaling and colour translation. 

10 REM >Convert 

20 REM ProgjraTn Mode Converter 

30 REM Version Al.OO 

40 REM Author David Spenoer 

50 REM RISC User Hay 1989 

60 REM Program Subject to Copyright 

70 : 

80 ^SCREEULOAD "Screen'' 

90 PRINT TAB(0,0);MODE 
100 PROCconvert(15) 

110 PRINT TABtO,l)rMODE 
120 END 
130 : 

10DO DEE PROCconvertidmode) 

1010 *RMENSURE ColourlTans 0 RtlLOAD <Sy 
3 tem$Path>Modules.Colours 
1020 SYS "OS_Byte";135 TO ,,smode 
1030 SYS "OS_ReadModeVariable",smoder3 
TO , t scols 

104 0 SYS "OS ReadModeVariable",sniode,4 
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TO jr,sxeig 

1050 BYS "OS_KeadHodeVariable",smodei5 
TO ,,syeig 

1060 SYS ^'QS_ReadMocieVariable",smode,7 
TO f fsize 

1070 SYS ^^OS_ReadModeVariable'',Smode,ll 

TO , ir sx 

1080 SYS "OS_Readl'lodeVariabl$",smode, 12 

TO ffSy 

1050 SYS ^OS_ReadModaVariabIe";dmode,3 
TO ,idcols 

1100 SYS ^'OS^ReadMQdeVariable'^djnode,^ 
TO ;,dxeig 

1110 SYS '■OS_EeadftodeVa]:iable%dmode,5 
TO ,,dyeig 

1120 SYS “OS_ReadModeVariabie\djnode, 11 

TO ,,dx 

1130 SYS ■'OS_Readl^odeVariable'',dmodea2 

TO ,,dy 

1140 DIM map 256, screen si2:e+64, scale 

15, pal 64 

1150 ’scale^dx:scale!4^dy:scale 18=sxtsc 
a,le!12=sy 

1160 ]£creen=size+64:screen!4^0 

1170 screen!8=16:screen!12=16 

1180 SYS "OS_SpriteOp'", ^110, screen, "spr 


its", 0, 0, 0,sx«sxeig, sy«syeig 
1190 IF dcols>-scols AHD dcols<63 THEN 
1200 dp=pal 

1210 FOR loop-0 TO scols 
1220 SYS "OS_ReadPaletLe^',loop,16 TO ,, 
col 

1230 pal!(loop*4)=col 
1240 NEXT 
1250 ELSE 
1260 dp=0 
1270 ENDIF 

1280 SYS "ColourTrans_InvalidateCache” 
1290 SYS "ColourTran3_SelectTable",-1,- 
ljrdjnode,dp,[nap 
1300 MODE dmode 
1310 IF dp THEN 
1320 FOR loop=0 TO scols 
1330 Gol=pal! Uoop*4) 

1340 VDU 19, loop, 16,col»8,col»16, col> 
>24 

1350 NEXT 
1360 ENDIF 

1370 SYS "OS SpriteOp", ^^l34, screen, "spr 
ite",0,0,0,scale,map 

1380 SYS ^OS_SpriteOp'% &109, screen _ 
1390 ENDPROC Miii 


A PARTIAL RENUMBER UI H I I'V (continued from page S’ 


1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 

1740 

1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1850 

1860 


,cloop CMP R2,#1:BEQ prtnum2 
SWI &120:SUB R2,R2,#1:B cloop 
.prtnum2 SHI "OS_Hrite0" 

LDMFD R13!,{R0-R3}:MOy PC, R14 


.candg MOV RO, If&eFOO 
ADD RO,RO,#1:MOV R1,#0 
.candg2 LDRB R2,[RO,#!] 

LDRB R3,(ROlrADD R2,R2,R3,LSL #6 
CMP R3,nFF:ADDNE Rl,Rl,#l 
LDRNEB R3,[R0,#2J :ADDNE PO,RO,R3 
BNE candg2:ADD R0,R0,ff4 
BIC R4,R0,#3:MOV R3,Rl,L3L #2 
SHI "OS_GetEnv":ADD R0,K3,R4 
MOV R5,R4:CMP R0,R1:ADRHI R0,nrerr 
LDMHIFD R13!,{R14} 

ORRHIS PC,R14,#1«28 
MOV RO,#fi8FOO:ADD R0,R0,#1 
.candg3 LDRB R2, [RO, H] 

LDRB R3,[R0J:ADD R2,R2,R3,LSL if8 
STR R2, [R41,S4:CMP R3, ^ISFF 
LDRNEB R2, [RO, lf2j :ADDNE R0,R0,R2 
BNE candg3:MOV PC,R14 


1670 .getrange MOV Rll,R14:MOV R3,#0 

1330 LDR RO, [Rl2,il2] :CMP R0,#0 

1890 BEQ nostart:BL gnam:MOV R3,R0 

1900 .nostart LDR RO, IR12, If 161 

1910 MOV R4,#&FFOO;SUB R4,R4,n 

1920 CMP R0,#0:BEQ noend 

1930 BL gnum:MOV R4,R0 

1940 ,noend MVN R5,#0:MOV R6,i0 

1950 MOV R2Ji8P00:ADD R2,R2,tl 

1960 .gr LDRB RO,[R2,fill 

1970 LDRB R1,[R2]:ADD R0,R0,R1,LSL iS 

1980 CMP R0,R3:BCC noloiCMP R6,#0 

1990 MOVEQ R7,R2:MVNEQ R6,fl0 

2000 .nolo CMP R0,R4:LDRLSB R8, fR2,ff2] 

2010 ADDLS R8,R2,R8:CMP R6,#0 

2020 MOVEQ R5,R0:CMP RO,I&FFOO 

2030 LDRCCB RO,rR2,#2]:ADDCC R2,R2,R0 

2040 BCC gr:CMP Re,R7:ADRL3 R0,bserr 

2050 LDMLSFD R13!,{R14} 

2060 ORRLSS PC, R14, #1«28 :]yiOV PC,R11 
2070 I NEXT 

2030 SYS "OS_File",10,"Renumber",SFPC,, 
code, 

m 
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ARC PROCEDURE LIBRARY 


by Lee Calcroft 

This month our procedures automate the process of drawing selection boxes, 
ond of determining which, If any, has been selected by the user. 


The procedures which we mtroduced last 
month permitted comprehensive polling of the 
mouse, and checking for the position of the 
pointer. This month we will complement these 
with a procedure for drawing sets of coloured 
selection boxes, each of which may contain text 
of the user's choice, and a function which wilt 
return the number of the currently selected box. 

To avoid duplicating information In the proce¬ 
dure which draws the boxes, and the function 
which polls them, I have used an array to hold all 
common data. This means that the system is very 
easy to use. You simpfy set up one array for each 
set of selection boxes, then call PROCdrawgrid to 
draw it, and use FNgetboxno to check which box 
in the current set the user has chosen. 


□ X co-ordinat© of bos© 

1 Y co-ordinate of base 

2 Cell width 

3 Ceil height 

A No of cells across 

5 No of celts down 

6 Total width (calculated) 

7 Total height (calculated) 

8 Selection background colour 

9 Grid line colour 

1G Text colour 

11 Text X offset 

12 Text Y offset 


Table 1. The Elements in a Selection 
Box Array 

THE ARRAY 

Table 1 gives the use 1o which each of the 
13 array elements is put. Each must be set up 
at the start of the program (as in PROCinitialise 
in the example), except for elements 6 and 7. 
which are calculated within the program when 
the grid is first drawn. The function of each 
should be more or less self explanatory. The 
first two are the co-ordinates of the bottom left- 
hand corner of the selection area. If the first of 
these, the X co-ordinate, is given as *1, then 
the selection grid will automatically be centred 
horizontally (see the lower grid in the example 
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program). The next two co-ordinates are the 
width and height of a single selection cell. Then 
comes the number of colls in the X and Y direc¬ 
tions, followed by the colour numbers tor the 
background, the selection grid itself, and the 
text. Finally there are two offsets for the text. 
These should be adjusted by trial and error to 
ensure that the text falls symmetrically within a 
given set of boxes. 

PROCdrawgrid 

The grid drawing procedure has just two 
parameters: the name of the array holding the 
data, and a keyword used to identify the block 
of text to be used with the grid. If no text is 
required, then this should be given as a double 
quote, as with the second grid in the example. 

in order to avoid using line number refer¬ 
ences (which in any case are not permitted when 
using IfsISTALLed libraries), I have made use of a 
special procedure PROCrestore. This will restore 
any block of data, located by the label passed as 
a parameter. In the accompanying example, the 
word "Fruits’’ identifies the group of four fruits 
whose names appear in the first menu grid. 

FNgetboxno 

This function takes three parameters: the X 
and y co-ordinates of the pointer at the time of 
selection, and the name of the array corre¬ 
sponding to the grid that you wish to check. It 
returns the number of the box selected, or -1 if 
the pointer is outside the designated area. 

To see how the procedure-function pair are 
used together, take a look at the example. This 
contains all the code you need, except for the 
definitions of PROCmousewait and FNpositiond 
from last month. These should both be append¬ 
ed to this month’s program. 

When you fun the program you will see two 
different selection grids, one with text, the other 
without. If you press the Select button, a number 
will be displayed giving the number of the box 
under the pointer (or zero if you are not over one 
of the two grids). Note the way in which the pro- 
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gram increments by ten the grid number 
returned by the second grid. This resuEts in a 
unique nurnber being returned for each one of 
the 44 possible choices, and would allow you to 
use a single CASE statement to deal with any 
selection made anywhere on the screen* 



Two sets of selection boxes in use 


Because of the use of arrays to hold the data 
for each selection grid, it is a very simple matter to 
change any feature of any of the grids. For exarri^ 
pie, to make the first grid two columns wide, alter 
areal %(4) trom 1 to 2 in PROGinitialise, and add 
four more words to the data at the end of the pro¬ 
gram, This is a//that you need to do. The selection 
function does not need to be altered at all. It is 
even easier to change the position of a box on 
screen, and almost as easy to add a completely 
new set of boxes by introducing a third array. 

NEXT MONTH we will add a touch of class to 
our selection screens, and provide a procedure 
for creating three-dimensional selection boxes. 

ID REH >Mse2pi:cs4d 

20 REM Procedure/Function Library 

30 HEM Version A 0,^ 

^0 REM Author Lee Calcraft 
50 HEM RISC User May 1989 
60 REM Program Subject to Copyright 
70 : 

30 HODEl2iVDU19,0,24,0,192,128 
90 on ERROR REPORT:PRINT'' at line 
RL; Oil: ELIO 

lOQ PEOCiriitialise 

110 PRINT''Seiect to test grids" 


120 PRTNT"or Menu to quit" 

130 PROCdrawgrid Eareal% ,"Fruits") 
140 PROCdrawgrid(area2%0,"") 

150 OFF:*POINTER 
160 REPEAT 


170 PROCmousewait f-B) 

130 IF THEN 

190 CASE TRUE OF 

200 WHEN FNgetboxno {x%,y%,areal^0 

) >0:choice%=FNgetboxnci (x%, y%,areal%{)} 
210 WHEW FNgetboxnolK%,y^,area2%{) 

) >0 : chc>ice'fe=l 0 +FWgetboxno {x%, y^, area2 % ( ) 

) 

220 OTHERWISE choice%-0 
230 ENDCASE 

240 PHIWTTABto,5);"Selection ";choic 


250 ENDIF 

260 UNTIL z%=2 

270 ON 

230 END 

290 

300 DEFPROCinitialise 
310 DIM areal%{l2j 
320 DIM area2%{12) 

330 REM. 


340 areal%t0)=140 
350 areal%(11=500 
360 areals(21=200 
370 areal%(3l=64 
380 areal%(4)=l 
390 areaU.{5)=4 
4 00 areal^p (3) =4 
410 areals(9)=7 
420 areal'll (10) =7 
430 areal%(ll)-l6 


460 area2%t0)=-l 
470 area2'Hll=64 
480 area2l(2j-100 
490 area2%[3)-64 
500 area2%(4l-l0 
510 area26[51=4 
520 area2%(B)=l 
530 area2?.(9)=3 
540 area2f,(10)=0 
550 area2^(ll)-4 
560 area2'^ (12) ==4 


First group 
:REM X coord 
;REH Y coord 
:REH Cell width 
:REM Ceil height 
tREM Cells across 
:REM Calls down 
;REM Box beg blue 
:REM Box line white 
■REM White text 
:REM Text x offset 
jREM Text y offset 
Second group 
:REM Keg so centre 


:REM Red beg 
:HEM Yellow lines 
;REM Black text 


440 areal % (12) >=16 
450 REM 


570 ENDPROC 

590 DEFFNgetboxno(x%,yli al(1) 

600 HEM Returns no of selected box 
610 REM Counting from top left |=ncj 1) 
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€20 REM and moving left to right 
630 LOCAL 

6^0 IF FNpositiondfx%,y%,a%(0)fa%(I), a 
%[6),a%(7)) THEW 

650 ix%-(x%-a%(0)J DIVa%{2)+l 

660 iy%-a%{5)-(y%-a%(l)) DIVa%f3)-l 

670 no%=ix%+a%(4}*iy% 

680 ELSE nol=-l 
690 ENDIE 
700 =no% 

710 ========.™======™==^^^^==== 

720 DEFPROCdrawgridia%{J^teKt$) 

730 REM Draws simple selection grid 
740 LOCAL ix%;iy%,no% 

750 a%f6)=a%(2)*a%(4) 

760 a%[7)=a%(3)*a%(5) 

770 IF a%{0)=-l THEN a%(0)=(12S0“a%{6) 
)DIV 2 

780 GCOL a% fB) 

790 RECTANGLE FILL a%(0),a%{1),a%(6), a 
^7) 

800 GCOL a^t9) 

810 FOR iy%=a%{l) TO a%a)+a%(7) STEP 
a%[3) 

820 LINE a%{0},iy%,a%[0)fa%|6),iy% 
830 NEXT 


840 FOR ix%=a%f0) TO a%(0j+a%f6) STEP 
a^(2) 

350 LINE ix%,a%(l) ,ix%,a%(lj+ain) 
860 NEXT 

870 IF text$<>''" THEN 
880 PROCreatore(teKt$i 

390 VDUSiGCOL a%fl0) 

900 FOR iy%=a%{l}+a%(7) TOa%a)+a%f 
3) STEP -a%(3) 

910 FOR ix%=a%{0) TO a%(0)+a%(6)-a%( 
2) STEP a%(2i 

920 MOVE ix%+a%ai),iy%-4-a%il2) 

930 HEAD text$jPRIKTtext$ 

940 NEXT J NEXT 

950 VDU4:OFF 

960 ENDIF 
970 ENDPHOC 

9 BO ---========-=========™== 

990 DEFPROCrestoreUabelS) 

1000 RESTORE 

1010 REPEAT:READ a$:UNTIL aS=labelS 
1020 ENDPROC 

1030 --- 

1040 DATA Fruits 

1050 DATA Bananas, Apples, Pears, Pinea 


"FIRS T" 

/\dvaisic::ed statistioal system 

For Acorn Archimedes; BBC Models B, B+ and Master; 'Industry Standard' machines 
A powerful ond practical tool for Research, Industry, Business, and Teaching 

Integrated, intefactive, robust, fast, accurate, modular. Designed to facilitate data critique. 

Many data entry options. Full data management and formatted display. Extensive data transforms. 
Handles missing variables and data subsets. Scatterplots, regression plots, function plots. 
Univariate statistics. Paired arvd unpaired t tests, Chisquare tests. Nonparametric methods. 
Unrivalled REGRESSION facilities eg weighted, through the origin, standardised. Fulf statistical information. 
Residuals, fitted and predicted values. Much more. Correlations. ANOVA. Contour plots of regressions. 
Regression DIAGNOSTICS * VIFs. influential points etc. Automatic warnings. 

ROBUST regression - many influence functions. Powerful NONLINEAR least squares 
Time Series, eg moving averages, exponential smoothing, causal models. 

One- TwO' and Three-way ANOVA subsystems. Distributions generator. Histograms, Linear Calibration, 
Cluster analysis. Many other powerful analytical and descriptive features. Full utilities. 

Price £120-£180 (machine and version dependent). Special RISC USER discount available. 
There's for too rmich to describe here. Get full information now from: 

Serious Stoflstica) Software, Lynwood. Benty Mecih lane. Wilfaston. South Wirral L64 ISD TeL 051 327 4263 
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EXPANSION CARDS 





ACORN ARCHIMEDES 
COMPUTER SYSTEM 


1EEE488 INTERFACE a full implementation 
of the standard for automatic test and 
measurement systems 

16 BIT PARALLEL I/O two 16 bit input or 
output ports with handshake lines for digital 
control applications 

DUAL RS423 SERIAL INTERFACE for 

communicating with two additional RS423 or 
RS232 devices eg printers, plotters, 
instruments, etc 

12 BIT ANALOGUE I/O in development 

All the above high performance expansion cards are 
supplied with high level software for ease of use and a 
comprehensive user guide, 

Take advantage of Intelligent Interfaces' expertise and 
purchase a complete Archimedes Computer System. 

Officially appointed Acorn Scientific Dealer. 

I Intelligent Interfaces Ltd 

43b Wood Street jj^ 
Stratford-upon-Avon 
Warwickshire 
CV37.6JO 
Tel: 0789 415875 
Telex: 312242 MIDTLX G 
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Spin text around the screen with this program by James Bonfleld 


This month*s Visuals contribution is a pro¬ 
gram which will spin a piece of text on screen 
about a central point. The text is generated 
by the program itself using its own data, and 
the spinning effect uses 3D drawing tech¬ 
niques which include the use of perspective. 
Even though the letters are drawn relatively 
crudely (in order to keep the data statements 
to a minimum), the spinning effect works 
weii. 

When you run the program it asks for a 
message. This may be up to ten characters in 


length (though best effects are obtained with 
less), and these must be in uppercase. After a 
short pause, the message will appear, and will 
spin around a central point, with a continually 
varying plane of rotation. 

If you would like to try out the program with¬ 
out typing in ail the data, enter all lines up to 
930, and when prompted for text, enter hashes 
(#) or exclamation marks (!). Additionally, the 
program may be customised a little by experi¬ 
menting with the text size (slz&%), perspective 
(per%) and depth (depth%) in line 80. 



A sequence of images using RISC' 


10 REM >Rotate 

20 REM Program Text Rotation 

30 REM Version A 0.6 

^0 REM Author James Bonfield 

50 REM RISC User May 1989 

60 REM Program Subject to Copyright 

70 : 

SO si^e%-15:depth%=50:per%=2 
90 MODE 0:OFF 

lOO ON ERROR MODE 0tREPORT:PRINT" at 1 
ine "h‘ERL:END 

110 PROCatartdata 
120 PROCdotext 
130 REPEAT 
140 PROCdisplay 
150 UNTIL FALSE 
160 : 

170 DEFPROCstartdata 
leO ORIGIN 640,512 

190 theta-PI/50:psi=PI/80:alpha=PI/30 
200 SA=SIN(theta):CAICOS(thetaJ 
210 SB^SIN(alpha):CB-COS(alpha) 

220 SC=SIN{psi):CC=COS(psi) 

230 XX=CB*CC:XY=CC*SA*SB-SC*CA 


240 KZ-CA*SB*CC+5A*SC 

250 YX=CB*SC:YY=SA*SB*3C+CA*CC 

260 YZ=CA*SB*SC-SA*CC 

270 ZX=“SB:ZY-SA*CB:ZZ=CA*CB 

280 TY=0:TX=0ibank%=l 

290 ENDPROC 

300 : 

310 DEFPROCdOtext 

320 INPUT "Please enter message : "M$ 
330 PRINT"Please wait" 

340 number_of_points=0 
350 FOR I%=1 TO LEN{M$J 
360 PROGrestore_data 
370 READ S 

380 number_of_j>oints+=S 
390 NEXT 

400 DIM points(number_of_points,4) 

410 Sl=l 

420 FOR I%=1 TO LEN(M$} 

430 PROCrestoredata 

440 READ S 

450 FOR N=1 TO S 

460 READ points{SI,1)^points(SI,2),p 
Dints(SI,4) 
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410 points(SI,l)=points(SI,1)+{I%'LE 
N{M$)/2VlO-7 

430 points (31,2} ==points (SI, 2) -4 i S1=S 
1 + 1 

490 NEXT 
500 NEXT 
510 ENDPROC 
520 : 

530 DEFPROCdisplay 

540 A=0:X=pointS(0,1)tY=pointS(0,2) 

550 Z=points (0,3) 

560 PROCperspective 
570 OX%=XS%:OY%=YS% 

580 SYS 6,112,banlc% 

590 bank%=bank% EOR 3;SYS 6,113,bank% 
600 WAITiCLS 

610 FOR A=1 TO number_of_pointE 
620 X=points(A,1) 

630 Y=points(A,2) 

640 Z=points(A,3) 

650 PROCperspective 
660 IF points{A,4}<>0 THEN LINE OX%,0 
Y%,XS%,YS% 

670 OX%=XS%:OY%=YS% 

680 NEXT 
690 S-={S<l2}/5 
700 ENDPROC 
710 : 

720 DEFPROCperspective 

730 XT=X*XX+Y*XY+Z*XZ 

740 YT=X*YX+Y^Yy+Z*YZ 

750 ZT=X+ZX+Y^ZY+S*ZZ 

760 points(A,1) =XT :points(A,2)=Yr 

770 points(A,3)=ZT 

780 XS%=size%*XT*depth%/ (ZT+per%+clepth 

%) 

790 YS%=size%*YT’^depth%/{ZT+peE:%+depth 

%) 

SOG ENDPROC 
810 : 

820 DEFPROCrestore^data 
830 RESTORE 
840 REPEAT 
850 READ 

860 UNTIL a%=ASC(NID$(MS,I%,l]) 

370 ENDPROC 
880 : 

890 DATA 31,1,0,0,0 
900 DATA 32,1,0,0,0 
910 DATA 33,4,3,0,0,3,1,1,3,4,0,3,8,1 
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920 DATA 34,4,2,5,0,2,8,1,4,5,0,4,8,1 
930 DATA 35,8,2,0,0,2,8,1,4,0,0,4,8,1, 
0,3,0,6,3,1,0,5,0,6, 5,1 

940 DATA 36,8,0,1,0,6,1,1,6,4,1,0,4,1, 
0,7,1,6, 7,1,3, 0,0, 3, 8,1 

950 DATA 37,6,0,0,0,6,8,1,6,1,0,5,2,1, 
1.6,0,0,7,1 

960 DATA 38,7,6,0,0,0,5,1,2,3,1,4,5,1, 
0,2,1,2,0,1,6,3,1 

970 DATA 39,4,2, 5,0,3,6,1,3,7,1,2,7,1 
980 DATA 40,4,3,0,0,2,2,1,2,6,1,3,8,1 
990 DATA 41,4,3,0,0,4,2,1,4,6,1,3,8,1 
1000 DATA 42,8,0,0,0,6,8,1,6,0,0,0,8,1, 
3,0,0,3, 8,1,0, 4,0,6, 4,1 
1010 DATA 43,4,3,0,0,3,8,1,0,4,0,6,4,1 
1020 DATA 44,4,3,-1,0,4,0,1,4,1,1,3,1,1 
1030 DATA 45,2,0,4,0,6,4,1 
1040 DATA 46,5,3,0,0,4,0,1,4,1,1,3,1,0, 
3, 0,1 

1050 DATA 47,2,0,0,0,6,3,1 
1060 DATA 48,6,0,0,0,6,0,1,6,8,1,0,8,1, 
0 , 0 , 1 , 6 , 8,1 

1070 DATA 49,5,2,0,0,4,0,1,3,0,0,3,8,1, 

2 . 6,1 

1080 DATA 50,6,6,0,0,0,0,1,6,5,1,6,8,1, 
0,8,1,0,5,1 

1090 DATA 51,6,0,0,0,6,0,1,6,4,1,0,4,1, 

6 , 8 , 1 , 0 , 8,1 

1100 DATA 52,5,0,8,0,0,3,1,6,3,1,3,0,0, 

3.6.1 

1110 DATA 53,6,0,0,0,6,0,1,6,4,1,0,4,1, 

0 , 8 , 1 , 6 , 8,1 

1120 DATA 54, 6,2, 8, 0,0,4,1,0,0,1,6,0,1, 
6,4,1,0,4,1 

1130 DATA 55,3,0,8,0,6,8,1,2,0,1 
1140 DATA 56,7,0,0,0,6,0,1,6,8,1,0,8,1, 
0,0,1,0,4,0,6,4,1 

1150 DATA 57,5,6,0,0,6,8,1,0,8,1,0,4,1, 

6.4.1 

1160 DATA 58,10,2,2,0,3,2,1,3,3,1,2,3,1 
,2,2,1,2, 5, 0,3,5,1, 3, 6,1,2, 6,1,2, 5,1 
1170 DATA 59,9,2,1,0,3,2,1,3,3,1,2,3,1, 
2,5,0,3,5,1,3, 6,1,2, 6,1,2,5,1 
1180 DATA 60,3,6,0,0,0,4,1,6,8,1 
1190 DATA 61,4,0,3,0,6,3,1,0,5,0,6,5,1 
1200 DATA 62,3,0,0,0,6,4,1,0,8,1 
1210 DATA 63,7,0,8,0,6,8,1,6,4,1,3,4,1, 
3,3,1,3,0,0,3,1,1 

1220 DATA 64,10,6,0,0,0,0,1,0,8,1,6,8,1 
,6, 2,1,4,3,1,4,6,1,2, 6,1,2,3,1,4,3,1 
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1230 DATA 65,5,0,0,0,3,8,1,6,0,1,1,3,0, 

5.3.1 

1240 DATA 66,10,0,0,0,0,8,1,3,8,1,5,6,1 
,3,4,1,6, 2,1,4,0,1,0,0,1,0,4,0,4,4,1 
1250 DATA 67,4,6,0,0,0,0,1,0,8,1,6,0,1 
1260 DATA 68,6,0,0,0,0,8,1,3,8,1,6,4,1, 
4,0,1,0,0,1 

1270 DATA 69,6,6,0,0,0,0,1,0,8,1,6,8,1, 
0^4, Oy 5/^/1 

1280 DATA 70y5y0y0,0,0y8,ly6,8yl|0,4,0y 

4.4.1 

1290 DATA 71,6, 6,8,0, 0,8,1,0,Oyl,6yO,l, 
6y4,l,3,4,1 

1300 DATA 72,6,0,0,0,0,8,1,6,0,0,6,8,1, 
0,4,0, 6, 4,1 

1310 DATA 73,6,2,0,0,4,0,1,3,0,0,3,8,1, 
2,8,0,4,8,1 

1320 DATA 74,5,0,0,0,3,0,1,3,8,1,0,8,0, 

6 . 8.1 

1330 DATA 75,6,0,0,0,0,8,1,0,4,0,6,0,1, 
2, 3,0, 6, 3,1 

1340 DATA 76,3,0,8,0,0,0,1,6,0,1 


1350 DATA 77,5,0,0,0,0,8,1,3,4,1,6,8,1, 

6 , 0,1 

1360 DATA 78,4,0,0,0,0,8,1,6,0,1,6,8,1 

1370 DATA 79,5,0,0,0,0,8,1,6,8,1,6,0,1, 

0 , 0,1 

1380 DATA 80,5,0,0,0,0,8,1,6,8,1,6,4,1, 
0,4,1 

1390 DATA 81,7,0,0,0,0,8,1,6,8,1,6,0,1, 
0,0,1,3,3,0,7,-1,1 

1400 DATA 82,6,0,0,0,0,8,1,6,8,1,6,4,1, 
0,4,1,6,0,1 

1410 DATA 83,6,0,0,0,6,0,1,6,4,1,0,4,1, 

0 , 8 , 1 , 6 , 8,1 

1420 DATA 84,4,3,0,0,3,8,1,0,8,0,6,8,1 

1430 DATA 35,4,0,8,0,0,0,1,6,0,1,6,8,1 

1440 DATA 86,3,0,8,0,3,0,1,6,8,1 

1450 DATA 87,5,0,8,0,1,0,1,3,4,1,5,0,1, 

6 , 8,1 

1460 DATA 88,4,0,0,0,6,8,1,0,3,0,6,0,1 

1470 DATA 89,5,0,8,0,3,4,1,6,8,1,3,4,0, 
3,0,1 

1480 DATA 90,4,0,8,0,6,8,1,0,0,1,6,0,1 

m 


ARCHIMEDES EXPANSION 
CARDS FROM WILD VISION 


CHROMA 300- 

Video Overlay and Genlock System. Enables Archimedes generated graphics and text 
to be superimposed in full colour on a video signal from a camera or VCR. 

Ideal for captioning videos. 

HAWK V10- 

tmage Process!rvg System designed to match the^high speed of the Archimedes. 
Captures* stores and displays up to 4 videoimages in real time independently of the host 
Archimedes. 


ADI 208- 

High Speed AnalogueyOigital I/O Card I2'bit, 8 channel analogue to digital converter, 
166000 samples per second and 8-bit “user port" digital I/O. 


Full information on these easy 
to tft cards from: 



Wild Vision 

6 JESUOND ROAD NEWCAST LE UPON TV NE NE2 ^PO 
TEL:0S1 2B1 MBI 
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Computing 


Latest version includes NEW lighting effects and help 
menu, plus easier ways of colouring and viewing scenes. 


Euclid 


The 3-D modelling 
and animation system for 
the Acorn Archimedes. 


Here's what the reviewers say: 


“...even half an hour spent with Euclid will suggest 
many uses in education, professional design, math¬ 
ematics, programming, and CAD applications: buy 
it...and you won’t be disappointed.* 

Micronet 


“Children enjoy the immediacy of this program and its 
ability to capture the imagination of even reluctant 
learners is quite extraordinary.* 

The Times Educational Supplement 11 November 1988 


EUCLID - Explore a new dimension! 


Price: £45 (inc VAT and P&P). 

Coming Soon: Orders now being taken for new 
RISCOS only version-E70. 


Available by mail order from: 

Ace Computing, 27 Victoria Road, Cambridge CB4 3BW. 

Or from your locai dealer. Bupndiuoo 93 W 


26 


RISC User May 1989 






MimiiE msi§i mm&f 




by Loe Calc raft 


RISC User Volume 2 Issues 1 ancf 2 fea¬ 
tured a Movie Maker package which permits 
the creation of animated sequences of aJI 
kinds. As presented, the program only permits 
playback from within Movie Maker itself, but as 
promised, we now give a short program which 
will allow Movie Maker files 1o be replayed 
independently. This means that animated 
sequences can be included within other pieces 
of software: and as a bonus, a special feature 
permits the replayed images to be placed any¬ 
where on a mode 13 screen. 

To try it out, type in 
the program, and en¬ 
sure that you have a 
machine code file 
called DeltaCode {the 
one used with Movie 
Maker), and an anima¬ 
tion file (as created by 
Movie Maker) in your 
current directory. You 
must then customise 
the program to suit 
your requirements. 

There are four values 
to adjust in the first Animated sequen 
few lines of the pro- anywhere on a 
gram. Set f{iQ$ in line 

90 to the name of your animation file, and 
framesX to the required playback speed (50, 
25, 12, 6 or 3 frames per second). Lines 110 
and 120 contain horizontal and vertical off¬ 
sets for the image, if these are both zero, the 
image will appear at the positiori where it 
was originally created. The vertical scale 
runs from 0 to 255, and the horizontal from 0 
to 319. Megative numbers may be used (to 
move left or upwards), but you should not let 
any part of the image go above the top of the 
screen, or errors will occur. 

The program itself is very simple. It uses 
just three procedures in sequence: PROCinit, 
PROCIoad and PROCrepiay. This latter lakes 
as its parameter the number of the last frame to 
be displayed. In our example we have used the 

RISC User May 1989 



Animated sequences can be placed 
anywhere on a mode 13 screen. 


variable frametot to display the full sequence. 
But you could if you wish be more creative. For 
example, you could display the sequence from 
frame 1 to 13 ten times in succession, and then 
finish off the display by showing the whole 
sequence. To do this use: 

FOR COUilt=^l TO 10 

PROCreplay(13) 

NEXT 

PROCreplay (frametot) 

Finally, two more points that might be useful 
when incorporating a 
display into another 
program. Firstly, the 
quantity of RAM 
reserved for the anima¬ 
tion file is automatically 
tailored to the size of 
the file itself in order to 
save RAM, and should 
therefore not need to 
be altered. And sec¬ 
ondly. every time that 
PROCreplay is called, 
the graphics screen is 
cleared to the back- 
:es can be placed ground colour used 
node 13 screen. when the animalion 
sequence was original¬ 
ly generated. If you wish to keep other things on 
screen during this process, simply set up a 
graphics window {after line 60) around your ani¬ 
mation area so that only this pari gets cleared. 
As an example VDU24.200:300;600;700: will 
set up a window whose bottom left and top right 
co-ordinates are 200,300 and 500.700. 


10 REM 

20 REH Program 
30 REM Version 
^0 REM Author 


>SoloAnim 
Solo Replay 
A 0.7 

Lee Calcraft 


50 REM RISC User May 1989 
60 REM Copyright Lee Calcraft 
70 : 

80 MODEl3;OFF 

90 file3="Dman2" :REM Customise 

Cor^tinuea on page 32 









INTRO 


Mike Williams investigates a new and professional looking draughting system 

for the Archimedes. 


The packaging and documentation of this 
new product are both very smart leading to a 
high expectation on the part of the potential 
user. Within its brief as a 2D draughting system 
you are unlikely to be disappointed, and in my 
view the manual is a model of clarity compared 
with much computer documentation. 

Designer Intro is supplied on disc, sealed in 
an envelope with a strorrg warning about copy¬ 
right, and in use the unique serial number of 
your copy is displayed on screen. The manual, 
while only some 40 pages in length, is well 
printed in stiff attractively designed covers. 

The separate installation notes cover Arthur 
1.2 and hard disc installation, but make no ref¬ 
erence to RISC OS. The manual does say that 
Designer Intro can be selected from the RISC 
OS Desktop, but my copy did not have the 
necessary files. However, l found no problems 
in running Designer Intro under RISC OS by 
booting the disc as usual. TechSoft says that 
RISC OS Desktop front-end will be included 
shortly. 

When Designer Intro is first entered, it 
shows the current default settings for confirma¬ 
tion or change before displaying the drawing 
screen. These defaults cover drawing size 
(from AO to A5), mouse sensitivity (a range of 
six from 0,1mm to 10mm), and choice of plotter 
or printer (23 makes including Epson, 
Graphtec, Hewlett Packard, Plotmate and 
Watanabe are detailed in the manual). 

Once the main drawing area is on view, the 
foot of the screen shows constantly updated 
information on the current cursor position and 
other details. The right-hand edge of the screen 
is devoted to a ten item menu. However, the 
first (fixed) item allows the user to cycle 
through 4 different menus giving 36 menu 
choices in all, and many of these give further 
choices, displayed temporarily at the foot of the 
screen, or prompt for additional user input In 
the top-most line of the screen display, The 
result is an uncluttered screen with quick and 
easy access to a wide range of choices. 



Most actions are mouse controlled, with the 
Select button called ExBcutQ (and correspond¬ 
ing to 'Y' for response to Y/N' type questions), 
the middle Menu button is designated Move 
(corresponding to 'N'), while the Adjust button, 
called Hunt helps in selecting existing points in 
a drawing. Execute is used to perform the cur¬ 
rently selected action, while Move locates the 
cursor at a new position. 

Some actions require keyboard input (to 
specify the size of an angle, for example), while 
the function keys (FO to F9) always correspond 
to menu choices 0-9. Designer Intro can also 
be switched between mouse and full keyboard 
control as you wish. I found mouse control 
much the easier, and this is the default. 

AN of these basic points are clearly and 
thoroughly covered at the start of the menu, 
which then follows with a tutorial section taking 
you In detail through three separate drawings. 
These 'walk throughs' are excellent, and do 
much to convey a good 'feel' for the package. 
However, I felt that I was then thrown too quick¬ 
ly into the reference section of the manual, and 
a couple more examples and perhaps some 
general guidance would be a useful addition at 
this point, 

BASIC DRAWING 

Drawing is delightfully easy. There is a 
Hubber-band iB^iure, as would be expected, or 
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free-hand drawing can be selected. An Ortho 
option constrains drawing in a horizontal or ver¬ 
tical direction, while a Grid may be selected to 
assist accurate drawing. With the grid selected, 
Grid lock forces the cursor to the nearest grid 
point, and a Fine option, as the name suggests, 
allows 10 increments between grid points. Ail of 
these items are in menu 1. 

CURVES 

Menu 2 deals with curve drawing and with 
transformations of part or ail of the current 
drawing. There are options for circles, ellipses 
and arcs. The simplest form of circle is defined 
by moving the cursor to mark its centre and 
typing its radius in from the keyboard. However, 
there are also options to draw a circle through 
a point, touching either one or two tines, arcs or 
circies, and several more options besides. The 
same is true for arcs. Thus complex shapes 
can be readily built up from circles, arcs, tan¬ 
gents and the like, and subsequently deleting 
the unwanted parts of any construction also 
seems to work remarkably well (see later), but 
splines or Bezier curves are not included. 

TRANSFORMATIONS 

Other options in menu 2 deal with transfor¬ 
mations of your drawing, or selected parts. The 
possibilities include Move, with the option of 
replicating an object, Mirror an object about the 
X or y axes, and Rotate an element through a 
specified number of degrees. With the latter 
two options, the transformed drawing can 
replace the original or be added to the original. 
There is also a similar A/fers/ze option. 

In addition to the above. Menu 2 aiso 
includes a hatching option. This is like a 'fill' 
routine except that you determine the angle 
and spacing of the lines to be used, and cross- 
hatching is achieved by repeating the process. 

Zoom and pan facilities are included in 
menu 3. There is also a separate scaling 
option which allows a particular scale factor 
to be specified. With the default scale of 1:1 
and A3 size, the screen drawing area repre¬ 
sents 360mm x 260mm. With a scale of 1:2 
lor example, the displayed drawing size will 
be twice the default, and so the picture 
appears smaller, 
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DELETIONS 

Perhaps the most important option in this 
menu is Delete, and it is worth explaining here 
a very important feature of Designer Intro. The 
software creates an internal representation of 
any drawing seen on the screen, so that at any 
time the current drawing can be re-created, and 
more importantly the software can identify any 
component of a drawing selected by the user 
Over and above this, the user can divide a 
drawing into a series of Elements. Thus when 
rotation is selected, the user specifies which 
elements of the drawing are to be rotated. 

When Delete is selected, a sub menu 
allows a choice between 'last item', line or part 
line, arc/cirde or part thereof, element or text. 
To delete a line or arc you just move the cursor 
near to that item and press Execute. The soft¬ 
ware locates that part of the drawing, which 
then flashes, for you to confirm that deletion 
should take place. As I said before, deletion 
seems to work remarkably well, any amount of 
deletion being handled without problems. The 
Redraw option is useful after multiple deletes 
may have left 'holes' in various lines. This 
method of representation and the use of ele¬ 
ments also allows any part of an existing draw¬ 
ing to be entered and modified. 

The fourth menu allows for text and dimen¬ 
sions (with arrows) to be entered. It also pro¬ 
vides for the saving and re-loading of drawings, 
and a number of other options. 

CONCLUSIONS 

The software has a good 'feer to it in practice, 
benetitling no doubt from the experience of pre¬ 
vious implementations for the BBC micro. Both 
software and documentation seem excellent, 
with the one qualification about the manual, 
and this is a product which can be thoroughly 
recommended TechSoft also says that a much 
enhanced version of this product (called 
Designer) should be available later this year. 


Product 

Designer Intro 

Supplier 

TechSoft UK Lfd. 


Old School Lane, 


Erryrys, Mold, Clwyd Ch7 4DA. 


Tel, C0e2> 433ia 
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POSSIBLY THE ONLY 
DRAUGHTING SYSTEM 
YOU WILL EVER /n 
I NEED /// 


Text antiy at tny size, angl* or tlopa 
(Text output limited only by the 
plotter eveMabte.) 

Hatching at any angl^spacing. 
Automaocaily finds endosed 
boundary plus single or multipio 
islands. 

Powerful ELEMEffT (layer) 
structure 


Pleeae remember that TechSoft can 
supply a wide range of CAO related 
peripherals and accessories, eg., 
piottere plotter pane etc 


Cheque with order pleeae. payable 
10 TechSoft UK Ltd 
Add VAT @ 15% of total (Official 
educational orders weleome.) 


+ VAT. 'utlSXESSJ 

NEW IDEAS IN SOFTWARE 


TechSoft UK Lid 
Old School Lane 
EnyryeMOlO 
Ch^CHTtOA 
Tel 082 43318 


ONLY 
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David Spencer explains the quick way ot adding your own star commands. 


So-called operating system utilities provide 
a simple way of adding your own machine code 
utilities as star commands, without going to the 
lengths necessary to write a fufl-blown relocat¬ 
able module. The Partial Renumber program 
which appears elsewhere in this issue is a utili¬ 
ty of this type, as was the Basic program lister 
from last month's RISC User 

CREATING A UTILITY 

The operating system recognises a utility 
command by its filetype, which must be set to 
&FFC. It is a simple matter to save the utility 
code, date stamp it, and set the filetype all in 
one go. This is done using a command such as: 

SYS "OS_FaleM0/"Prog",£FFCwStart,end 
where Prog is the filename, and s/arTand end 
are the start and end addresses of the assem¬ 
bled utility. The utility can then be loaded and 
executed by typing: 

*Prog 

which will cause the operating system to load it 
into the relocatable module area {RMA), and 
run it from there. Therefore, all utility code must 
be fully relocatable. 

PARAMETERS 

When a utility is started, register R1 points to 
any parameters given after the utility name. This 
will simply be the tail of the star command. This 
can be seen in the example program given later. 

WORKSPACE 

It is highly likely that any utility will require 
some workspace other than the processor's 
registers* When a utility is executed, the oper¬ 
ating system automatically allocates 1024 
bytes of workspace in the RMA, On entry to the 
routine, register R12 points to the first byte of 
this workspace, and R13 points to the first byte 
after the workspace (in other words the 
address of the last byte plus one)* The 
workspace will always be word-aligned. 

It Is conventional (but not mandatory) to use 
register R13 as a stack pointer. This means that 
the stack, which must be of the full-descending 
type, will grow down into the 1K workspace, and 
care must be taken not to overwrite it when 
using the workspace. In an average program 
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which uses the stack for storing return address¬ 
es and temporary registers, about 100 bytes 
should be allowed for the stack. 

If more workspace is required, this can be 
claimed using the call SWI "OS_Module", with 
a C/a/m Block reason code, as described on 
page 361 of the Programmer's Roforonco 
Mamal Any memory claimed in this way must 
be released before the utility exits. This is also 
done with SWI "OS^Module", and is explained 
on page 362 of the PRM. 

ERRORS 

An important point with utilities, and one 
which couid cause many problems, is the hand¬ 
ling of errors. Basicafly, a utility must not direct¬ 
ly cause any errors to be generated. Instead, if 
the utility wishes to generate an error, it must 
set register RO to point to an error block, and 
return normally, but with the overflow flag set. 

An error block consists of a word-aligned 
word containing the error number, followed by 
the text of the error message terminated by a 
byte containing zero. This is explained on page 
9 of the PRM. 

The best way of setting the overflow flag 
before exit is to use the instruction: 

ORRS FC,R14,#1«23 

This assumes that the return address is in R14. If 
it has been stacked, then It must be popped again 
before the above instruction is executed. It is also 
important to ensure that in the case of a normal 
exit, the overflow flag is dear On entry to the utili¬ 
ty, this will always be true, so the best method is 
to restore the flags as well as the return address 
when exiting. This can be done with: 

MOVS FC,R14 

if the link register has not been stacked, or: 

LDMFD R131/{PC}" 

if it is stacked. 

A further twist is in calling SWI routines, as 
these also rnust not be allowed to generate 
errors. To ensure this, all names must be pre¬ 
fixed with an for example: 

SWr "XOS_Kodule” 

This means that if an error occurs, rather than 
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generating it, the SWI will return with the over¬ 
flow flag set, and register RO pointing to an 
error block. If a utifity makes a SWI call and 
finds the overflow flag set on return, it must exit 
immediately leaving the flag set. 

EXAMPLE 

The program given in the listing creates a 
simple utility which illustrates many of the fea¬ 
tures discussed. The utility will read a numeric 
parameter from the command line, and provid¬ 
ed the value is non-zero, double it and print the 
result. In the case of a zero value, an error is 
given. The utility is saved as 'DEMO^ and can 
be invoked using, for example: 

*DEMO 123 

which will print the result 246. 

10 REM > DemoSrc 

20 REM Program Utility Demo 

30 REM Version A 1.00 

^0 REK Author David Spencer 

50 REM RISC User May 1939 

60 REM Program Subject to Copyright 

70 : 

80 DIM code 100 


90 FOR pass-0 TO 3 STEP 3 
100 P%=code 
110 [OPT pass 

120 \ Read value - R1 points to tail 
130 MOV RO,#10:MOV R2,#1«31 
140 SWI "XOSReadUnsigned" 

150 MOWS PC,R14 
160 CMP R2,iO:BNE notzero 
170 ADR RO,errorblock 
130 ORRS PC,R14,#1«2& 

190 \ Double number into RO & convert 
200 -notzero MOV R0,R2,LSL #1 
210 MOV RlfRl2:MOV R2,#256 
220 SWI ”XOS_ConvertCardinal4" 

230 MOWS PC,R14 

240 \ Output result + Newline 

250 SWI "XOS_WriteO":MOWS PC,R14 

260 SWI "XOS_NewLine'':MOWS PC,R14 

270 MOVS PC/R14 \ Retain entry flags 

280 .errorblock EQUD 1234 

290 ECUS "A zero value was given"' 

300 EQUB 0 
310 JNEXT 

320 SYS "OS File'V 10,"Demo",*FFC,, code 
,P% 


m 


1 


lOO frame3%-25 : REM 25 frames/sec 

110 Koffset^O :RIM Horiz offset 

120 yoffset=0 :REM Vert offset 

130 PROCinit 
140 FROCload(file$) 

150 PROCrepIay{frametot) 

160 ON 
170 END 
180 ; 

190 DEFPROCinit 

200 ON ERROR REPORT^PRINT" at line ";E 
RL:ON;END 

210 handle=fe=OPENlN(file$) 

220 bsizet=EXT# handlet +&400 
230 CLOSED handle! 

240 DIM screens bsize! 

250 DIM buff S 30 ,code & 2 C 0 

260 OSCLI("LOAD DeltaCode "+5TR$'COde) 

270 speed!^50 DIV frames! 

280 Al=sc];eeriS+bsi ze!'&10 

290 CALL code :REH initialise 

300 basaddr=!{code+ 244 ) 

310 I {codc + 244) ^basaddr4:^off set + yoffse 
t*320 


320 ENDPROC 
330 : 

340 DEFPROCreplay(stopframe) 

350 GCOL 128tstartcol TINT starttint 
360 CLG:B!=screens+12:KI=0 
370 REPEAT 

3B0 A%-B!:N%+=1:E%=USR{code+l2i 

390 IF speed%>0 THEN 
400 FOR S%-1 TO speed! 

410 WAIT 
420 NEXT 
430 ENDIF 

440 UNTIL N!-Stopframe OR B%=0 
450 IF B!>0 THEN A%-B%:frameno=N%+l EL 
SE framenc==N% ^ 

460 ENDPROC 
470 : 

480 DEFPROCload(fiIe$) 

490 03CLI{"LOAD "+file$+" 'HSTRS-'SCree f 
ns) 

500 frametot-Escreens 

510 startcol=^screens?4 

520 starttint-screens?5 

S30 EIJDPBOC [23 
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Attention RISCOS Users'.! 


A New Communications Package 
from BBC Soft 


Taking full advantage of RISCOS, ArcComm is an exciting, 
brand-new communications package for the Archimedes 
that you can't afford to be \wthout! 

ArcComm's comprehensive design allows access to all 
three European videotex standards (Prestel, Teletel, and 
Bildshinmtext), together with VT52, VT102, and ANSI 
terminals. 

It's wonderfully simple to use! All screen displays are clear 
and uncluttered, with pop-up menus and dialogue boxes, 
making control as easy as possible. 

ArcComm supports Hayes, DTI, and manual modems, 
with details of how to write drivers for other modems in the 
User Guide provided. You will need RISCOS, and at least 
1Mbyte of memory to use ArcComm. 

To order ArcComm, simply write to the address shown, 
enclosing a cheque. ArcComm is £29.95 inc VAT, plus 
£1.50 p&p per order. 


BBC Soft, 
PO Box 234, 
WETHERBY, 
West Yorkshire 
LS23 7EU. 



















RISC OS BASIC 

« 

Mike WiMiams describes some of Ihe new features to be found In Kasic V under RISC OS, 


In this article I shall deal with the additions to 
Basic itself, but note that there are also a num¬ 
ber of changes to the Basic assembler which we 
hope to deal with in a separate article, 

DYNAMIC LIBRARIES 

One of the useful features introduced into the 
original version of Basic V was the facility to 
access libraries of functions and procedures 
from within Basic, A set of such routines could 
be loaded into memory from a file by using the 
INSTALL or LIBRARY commands (see RISC 
User Volume 1 Issue 2). However, the manage¬ 
ment of this facility was not as flexible as it might 
have been. 

If more than one library is needed, then each 
witi take up additional memory as it is loaded, 
resulting in the allocation of quite excessive 
amounts cf memory in some instances. 

There is a well established way of over¬ 
coming this, and that is in the use of overlays. 
In the past a program would be divided up into 
a main program and several additional mod¬ 
ules, only one of which needed to be in mem¬ 
ory at any one time. Provided sufficient mem¬ 
ory for the largest module was allocated from 
the outset as an overlay area, any module 
could be loaded dynamically as and when 
required. 

That is basically the idea now implemented 
in Sasic V. It allows any one of a series of 
named libraries to be loaded dynamically as 
required into a single overlay area, and it works 
as follows. 

The new OVERLAY statement specifies a 
string array, which must already have been 
dimensioned, containing the names of the library 
files that may need to be loaded. It allocates an 
area of memory large enough for the biggest 
library, though none is loaded at this stage. 
Then, when a function or procedure Is calledf 
Basic V proceeds as follows. 

It first searches the current program, it then 
searches any LIBRARYs, then any fNSTALLed 
libraries, and finally the overlay area. If the rou¬ 


tine can still not be found it searches through 
each library file named in the OVERLAY array. 
Provided the routine is found in one of the 
OVERLAY files, that library will then be loaded 
into the overlay area and the routine executed. 

For example, we could write: 

DIM overlays(10) 
overlays (1) ="$. Library. Mathsl 
overlays {2) =" S. Library . Maths2 
overlays(3)="$,Library,Input" 
overlaysLibrary.Output" 

OVERLAY overlays 0 

to specify the four overlays given above. Any of 
the four named overlays will be loaded Into the 
overlay area if it contains a function or proce¬ 
dure which cannot otherwise be found. 

Unlike the use of LIBRARY and INSTALL, an 
overlay routine cannot reference a function or 
procedure in another overlay for obvious rea¬ 
sons, as all overlays dynamically share the 
same area of memory. Any overlays no longer 
required may have their name replaced by a null 
string in the overlay array, which wifi speed 
up any subsequent searching. 

Also, new overlay file names may be added 
to an existing overlay array (provided none is 
larger than any originally specified, but the 
names stored there should not otherwise be 
changed. A new OVERLAY statement will effec¬ 
tively re-inltiaiise the whole overlay facility, 
including a new allocation of memory for the 
overlay area. 

ARRAY HANDLING ENHANCEMENTS 

Although Basic V already allows for alf the 
elements of an array to be initialised to the same 
value (string or number as appropriate), there 
has until now been no simple way to set different 
values, other than by multiple assignment state- I 
ments. This has now been changed, and the val¬ 
ues may be listed after an equals sign f=") sep¬ 
arated by commas, thus: 

DIM code (5) 

code 0=129,132,135,131/133,134 
Remember that the first element of any array is 
element zero, and there are therefore six values 
for the dimensioned array in the example above. 

For multi dimensional arrays, the order is that 
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where the right-most subscript changes the 
quickest 

Two additional functions have now been pro¬ 
vided. SUMLEN returns the sum of the lengths 
of all the strings stored in a string array (and is 
to some extent the string equivalent of the 
numerical SUM function), while MOD returns the 
modulus of the elements of a numeric array, that 
is the square root of the sum of the squares of 
the elements, for example: 

modA=MOD(AO) 

or just: 

modA-MOD A{) 

SAVE AND RESTORE DATA POINTER 

Just as the error status can be saved to and 
retrieved from the stack (using LOCAL ERROR 
and RESTORE ERROR), the DATA pointer can 
now be similarly saved and recovered. LOCAL 
DATA saves the current DATA pointer to the 
stack, and RESTORE DATA retrieves it again. 
This is most useful where DATA statements are 
included in function and procedure libraries, 
where RESTORE+O (usually - but see below) is 
used to set the DATA pointer to the first item of 
data in the library routine. On exit from a proce¬ 
dure or function, the DATA pointer is automati¬ 
cally reset from the stack (similar to what hap¬ 
pens with the error status), and RESTORE 
DATA is not explicitly needed in these circum¬ 
stances. LOCAL DATA must be the last item to 
be declared LOCAL in a function or procedure 
definition (apart from LOCAL ERROR). 

Note, that in general, the statement: 

RESTORE +n 

will move the data pointer 'n' numbered lines of 
Basic from the current fine number. The form 
RESTORE +0 serves the purpose of setting the 
data pointer in a library procedure or function (if 
included near the start) to a point in the roLrtine 
before any DATA statements. 

MISCELLANEOUS ENHANCEMENTS 

As a further aid to error trapping, a statement 
of the form: 

ERROR EXT <numbet>, <String> 
will cause the current error handler to be 
invoked with the error number and message 
specified (as is the case when ERROR alone is 
used in the same way), but will now cause an 
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exit from Basic to the supervisor This can be 
useful if a Basic program effectively implements 
a star command so that when an error occurs an 
exit can be made back to the star prompt. 

If Basic is invoked with the command 
'BASIC, this can optionally be followed by a 
qualifier and filename. Thus: 

•BASIC Myprog 

will run the Basic program Myprog, and: 

•BASIC -chain Myprog 

has exactly the same effect, while 
•BASIC -load Myprog 
will load but not run the program, and: 

•BASIC -quit Myprog 

will run the ^sic program Myprog, and quit to 
RtSC OS on termination. The pseudo-variable 
QUIT may now be used in a Basic program to 
determine if the qualifier -quit was used (TRUE) 
or not (FALSE). 

A further change is that the pseudo-variable 
END may now be assigned a value (in a multi¬ 
tasking program). In this environment the task 
manager will allocate an initial amount of memo¬ 
ry, but by assigning a suitable value to END 
(during the course of the program), a multi-task¬ 
ing program can release unwanted memory for 
use by other tasks (or grab more). Remember 
that Basic starts at &BOOQ and will usually 
require a minimum of about tOK, thus: 
END=&AOOO 

is about the minimum setting for END in a multi¬ 
tasking context. If a Basic program Is not multi¬ 
tasking, then this feature should be ignored. 

Finally, there are a number of additional or 
changed error messages: 

0 Incorrect in-core file description 

2 Assembler limit reached 

6 Type mismatch: numeric array needed 

6 Type mismatch: string array needed 

10 No room to do matrix multiply 

11 No room for this DIM [was error 10] 

It No room for this dimension [also 10] 

27 Missing { 

37 No room for function/procedure call 
42 DATA pointer not found on stack 
44 Too many nested structures 
52 Can't Install library 
52 Bad program used as procedure/Tunctlon 
library 

52 No room for library jjjjj 
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Word Up Word Down 


STARTRADER 


An innovative 3-dimensional word game. 


A strategic space adventure of epic proportions 


* 3<(imensiORal and plan view displays 

* 33,000 + wofd dictionary 
^ Professionally digitised speech and sound fx 
* 1 to 6 players 

* Computer play options over 3 skill levels 

* Rotating 3-dimensional board 

* Time limit plus other extensive options 

* User-definable palette and mouse options 


SOO unique planets spanning 112 star systems 


BOTH 

PftOGRAMS 
RISC OS 
COMPATIBLE 


• Professionally digitised sound effects and speech 
* 20 different types of spacecraft 

* Reai'time combat and docking sequences 

* Realistic trading with market fluctuations 

* Outstanding graphics 

* Multi-screen icon based ship control systems 

* Scientifically based realistic game structure 


What the magealnaa ha¥a aald ... 

Wofti Up Dord Down, a 3D ScratJdle garrm that reatiy is excellent. It has delightful 
graphics and it worfcs heautifully masUy under mouse control... highly recoimnded^ 

Rise User. 

* Stanrader ... absorbing gameplay/ 

Rise User. 

^Outstanding graphics and sound effects. 

Archive. 


£17.95 each 


Prices all inclusive (Overseas orders add £1.00) 
Send Cheques/POs to; 

GEM ELECTRONteS, 17, Tandragee Road, 
Portadown, CRAIGAVON, UK. BT62 3BQ. 
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PREMIER TEXT PROCESSING 


Mark Seal&y mveshgotes o n&wcomer to the arena of text and word processing 

on the Archimedes. 

Premier is a difficult piece of software to environment, there can be any number of 

describe. It does many things that are largely buffers, which are separate places in memory 


concerned with manipulating text. The package 
Includes a word processor, and the manual was 
apparently written using this, but the software 
has much more to offer thanks to what the 
author of the package calls dynamic text and 
the use of command files. 

Most of the tasks that Premier does (and 
does well) are achieved by the use of an inte- 
gral command language, and this is at the 
heart of the whole system. The supplied word 
processor is an application written using this 
language, while the user can similarly write his 
own applications. Using the command lan¬ 
guage, what is produced - on screen and as 
hardcopy - can be controlled either in immedh 
ate mode, or via files of those same commands 
compiled and executed at various points during 
operation of the software. 

GEHING STARTED 

The single disc is accompanied by a 160 
page manual. There is also a keystrip for the 
word processor application, and two blank 
keystnps for your own applications. When boot¬ 
ed or selected from the Desktop (Premier runs 
under RISC OS. though will not yet multi-task), 
a default set of values is loaded if you provide 
no other parameters. These defaults set the 
screen to mode 12, and redefine ail the keys to 
sensible standard functions. 


in which text is kept. Markers (unlimited in num¬ 
ber but with at least one) identify exact posi¬ 
tions in the text and thus within the buffer. 
Obviously the initial cursor position is one such, 
Until you name and define a Window, no text is 
visible. Here, for example, a buffer is named 
and selected and a piece of text is assigned to 
that buffer. The text is then displayed in a two 
line window at the bottom right of the screen: 

buffer "request" 
select "request" 
display dynamic 

insert ""Please return your library books by " 
insert date 

window ""footright" = 20,21^20,70 
assign “"request" "footright" 
colour “"footright" = blue, ink, white 
open "footright" 

As long as "request" is selected, any text 
will be entered in the window to which it has 
been assigned, and be edited with the cursor 
keys. The date, read from the Archimedes 
Internal clock, will appear thanks to the com¬ 
mand display dynamic. 

APPLICATIONS 

One of the strengths of the package is that 
whole applications can be written to suit very dif¬ 
ferent requirements. The snippet above might 
come from an entire Lending Library filing system. 


The standard screen display uses a muted 
set of colours, and you quickly become accus¬ 
tomed to the various conventions used by 
Premier. One aspect that needs getting used to 
is that commands entered through the key¬ 
board are not executed immediately. Instead 
1he backspace key is used to execute a 
sequence of commands previously entered 

BUFFERS. MARKERS AND WINDOWS 
The tutorial section of the manual takes you 
through those concepts which are fundamental 
to Premier, whatever it is doing. In Premiers 


Data files of book titles and borrowers could 
all be read and manipulated by Premier's hun¬ 
dred or so commands. Letters of varying sever¬ 
ity could be sent according to the lateness or 
persistence of the borrower. Because a variety 
of arithmetic (as wall as logical, boolean and 
string) operators are available, fines could be 
calculated, VAT added, and a totally person¬ 
alised reminder sent. And this is just a start. 

COMMAND FILES 

These are likely to be written using the word 
processor application supplied with Premier, 


RISC User May 1989 


37 



ANNOUNCING A MAJOR NEW SOFTWARE RELEASE 



(EretmeM 



Circle Software are proud to announce a major new software release for 
the Archimedes. Premier is so new, there is as yet no defined category 
for it Is it a word processor? Is it a report generator? Is It a 
spreadsheet or a data base? Premier fits none of these categories, 
rather it spans them all. Premier is a major advance in capability from a 
single program. These are just some ot its features - 

The ability to read and execute commands from files allows any text processing 
to be carried out just by typing a 'star' command, or picking from the desk-top. 
Further, the abi% to define 'macro' commaixis, and to assign these to ANY key, 
allows complete 'applications' to be built, Including customised spreadsheets, 
and simple data bases. A command file defining a full featured word processor, 
with matching key-strip, is included with Premier. 

This word processor alone justifies the purchase of Premier, It allows text to be 
moved between any number of files open at once, searches to be made 
forwards or backwards using powerful pattern matching, document headers and 
footers to be defined, has on screen formatting and other features too numerous 
to list here. The command file defining this may be edited to tailor the features to 
your own requirements, a feature not found in any other word processor. 

DYNAMIC TEXT is a new concept which allows the inclusion of variable items 
within any document. Such items may show today's date or time, the current 
value of VAT, or a name and address. The actual text displayed may be 
computed, defined at the keyboard, or read from a data file. This system 
facilitates the production of statements and invoices, financial reports, or 
personalised mail shots. 

Premier's powerful command language, which includes maths and string 
functions, repeat loops and 'if - then' constructs, may be included in the 
definition of a DYNAMIC TEXT item, allowing full spread-sheet type facilities 
anywhere on the page, not just in neat rows and columns. This also allows 
printer codes to be sent, providing the simplest method yet devised to control 
printer functions from embeded commands. 


Now fully RISC-OS Multi-tasking. 

Write or phone NOW for full details, 
of Premier, a £5 refundable demo 
disc or the full version of Premier. 






Price including 160 page 
manual and applications, 
£96 + VAT, post free. 


Cirde Software 


33, Restrop View, 
Purton, Swindon, 
Wilts. SN5 9DG 
Tel: 0793 770021 
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REVIEWS 


PREMIER TEXT 


PROCESSING 


and are essentially made up from a superset of 
the commands already mentioned. Macros (like 
procedures in Pascal or other structured lan¬ 
guages) can be created, as well as multi-tine 
functions. Although plans to develop Premier 
further include improved arithmetic functions 
and arrays, there is already a pleasingly rich 
set of commands * with iteration and condition- 
afs - sufficient to devise quite sophisticated 
command files. 

How would you do this in practice? Assume 
your library suite has two windows on screen. 
In the upper you might want the text of the tet¬ 
ter which wilt be sent^ In the tower the name 
and address of the borrower together with a 
borrowing-record. The command file to do this 
largely obvious. First define your buffers^ and 
then initialise a variable to represent how late 
the borrower is: 

int ‘'overdue" = 0 

Then calculate the difference between now and 
then by reference to the date, assigning the 
result to the variable overdue, and read in the 
appropriate letter-file: 

if ( overdue >1 and overdue <= 2 ) lenient 
if ( overdue >2 and overdue <= 4 ) sharper 
if ( overdue >4 ) severest 

where lenient, sharper and severest have been 
defined as macros that will select and load the 
relevant files from disc into the correct buffer 
and window. 

It should be clear by now that very sophisti¬ 
cated applications can be developed. It has to 
be said, though, that extensive programming of 
applications will not necessarily be within the 
capabilities of all Premier users. It is to be 
hoped that third parties will eventually write 
applications, and indeed Circle Software them¬ 
selves are pursuing this point. 

Don't be put off, though. Studying the com¬ 
mand tile of the word processor application is 
probably as good a way as any to become 
familiar with this language, which is not difficult 
to use. However, the manual is rather poorly 
indexed, and, as it stands, does not really con- 
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tain enough detail on this subject. Since it will 
be the effectiveness of the command files - the 
programming * which will determine the useful¬ 
ness of the application, you must bear this in 
mind when deciding whether to buy Premier. 

Having said that, further applications 
(including a spreadsheet and database) are 
imminent. It is likely that impfovements to the 
manual will be made to reflect the need for 
greater clarity, and more detail on the writing of 
command files. And note that the purchase 
price includes all such updates and improve¬ 
ments this year. 

FURTHER FEATURES 

There is very little not under the user's con¬ 
trol Tabs can be set and colours changed within 
the palette of each screen-mode. There are 
constants and some measure of on-screen help 
for keyword syntax. Pages can be fully format¬ 
ted and Epson compatible printers addressed 
directly by control codes; text dialogue can be 
interactive with an equivalent to Basic's INPUT. 
There is an impressive array of search functions 
- with flexible wild-carding, and null as well as 
literal matching - both forwards and backwards. 

CONCLUSIONS 

Clearly, much thought has gone into this 
highly professional package. The fact thatJt is 
both dynamic, open-ended and intended for 
user-adaptation as well as being under continu¬ 
al development makes it particularly welcome. 
If you are used to using integrated data suites 
as in View Professional/Pipedream, or to cus¬ 
tomising applications to suit your business or 
hobby, then Premier should definitely be con¬ 
sidered. As upgrades appear. It can only grow 
in appeal. 


Product 

Premier Text Processor 

Supplier 

Circle Software 

33 ResTfop View, 

Purfon, Swindon SN5 9DG. ;| 

Price 

£110.40 Inc. VAT and p&p 

Pric« Includes all updafvt thfoughoul 

Demo disc tS f*fundabl» agolnst full purcha». 
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FUNCTION KEV CODES 


David Spencer shows how your programs can make the most of the keyboard. 


The 102 Key keyboard of the Archimedes is 
very nice, but making use of all the keys from 
within a program can be a bit tricky, tn this article 
I will show how the system can be programmed 
to allow all the keys to be read First, a brief 
description of how the keyboard is handled. 


Each time a key is pressed or released the 
keyboard sends an up-down code to the 
keyboard handler software within the operating 
system. The handler then converts this into a 
buffer code which is placed in the keyboard 
buffer When the key value is read from the 
buffer by the program, it is further translated 
into a code, or series of codes. The following 
short program will print out the codes of any 
keys pressed: 

10 REPEAT key-GET 
20 PRINT key 
30 UNTIL key-17 

The buffer codes for the vast majority of keys 
are exactly the same as the codes returned to 
the program. These correspond to all the keys 
wh^ch produce printable characters, or standard 
control codes such as Delete and Return. For 
example, pressing the key with the Caps 
Lock off will enter the value 97 (&61) into the 
keyboard buffer, and when the program reads 
this it will read out the value 97 (&61) which is 
the ASCII code for an 'a'. However, the function 
keys and cursor keys are very special cases. 


Key 

Basic 

Code 

Key 

+Shift 

Key 

+Ctrl 

Key 

+Shift+Clr! 

Print 

S.80 

&S0 

&A0 

&B0 

FI 

asi 

8c91 

&A1 

aB1 

F2 

&.Q2 

&92 

&A2 

m2 

F8 

^83 

^98 

SA8 

ms 

F9 

&d9 

&Q9 

&A9 

&B9 

Copy 

&SB 

&9B 

aAB 

SBB 

<Left> 

&8C 

&9C 

&AC 

&BC 

<Righl> 

&8D 

^9D 

^AD 

&BD 

<Down> 


&9E 

&AE 

&BE 

<Llp> 


&9F 

aAF 

^BF 

Page Down 

&9E 


&BE 

&AE 

Page Up 

&9F 

&8F 

&BF 

&AF 

FIO 

&CA 

&DA 

&EA 

&FA 

Fit 

&C0 

8.DB 

aEB 

&FB 

F12 

^00 

mo 

mo 

&FC 

Insert 

&CD 

mo 

&ED 

&FD : 


Table 1, Buffer codes for special keys 


action to perform. There are four possible 
actions: 

1. Ignore the keypress, 

2. Expand the keypress into a soft key 
definition. 

3. Translate the keypress to a single 
code. 

4. Translate the keypress to a zero 
value followed by a code. 


FUNCTION KEYS 

Table 1 shows the buffer codes for the 
function keys (and the cursor keys, but these 
can be ignored tor the moment). From the 
table, you can see that the code entered into 
the buffer depends not only on the key 
pressed, but also the combination of Shift and 
Ctrl as well. Furthermore, the Print key 
behaves as if it were function key FO, and the 
Insert key as if it were F13. When a function 
key code is removed from the buffer it is not 
returned directly to the program. Instead, the 
buffer code is split into two parts - the high and 
low hex digits (nibbles). For example, the buffer 
code for key F11 is &CB. This would be split 
into the high digit (12), and the low digit 
(11). The top nibble is then used to look up the 


For each of the 
eight possible 
buffer code 
high digits 
{SiS - S.F), 

there is a 
separate *FX 
calf which de¬ 
termines how 
that buffer 
code will be 
interpreted. 
The appropriate calls are listed in tabfe 2. 

The action of the keys is set using a command 
such as: 

*r>:221,n 
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FUNCTION KEY CODES 


where n determines the action for the chosen 
range of keys. The possible values are: 

0 Ignore the keypress. 

1 Expand the key as a soft key. 

2 Return zero followed by buffer 

code. 

3-255 Return n + key index. 

The first one of these is self-explanatory - 
the keypress is ignored. The second option 
causes the keypress to be expanded into a 
soft key definition (as defined with *KEY). 
The individual buffer code determines which 
key definition is used. For example, 

*FX226T will select the Shift-Function keys 
to be expanded into soft keys. Pressing Shift 
F2 will then enter the buffer code S(.92 {from 
table 1). The high digit is 9. and therefore the 
TX226 value will be iooked up (table 2), As 
we have set this to generate the soft key 
string, the operating system will take the 
definition corresponding to the low digit [2)^ 
and return this. 

The third option causes the keypress to be 
returned as two codes. The first is a zero which 
indicates 'Function key code follows', and the 
second is the buffer code of the key. For 
example, *FX225.2 will select the function keys 
(without Shift or Ctrl) to return two-byte codes. 
If key F8 is now pressed, two codes will be 
returned - a zero, and an &88. This can be tried 
out with the program given earlier. The main 
use of these two byte codes is so that function 
key presses can be distinguished from foreign 
characters generated using the Alt key. 

The final option allows a single byte code of 
the form n^x to be returned, where n is the 
value programmed with the "FX command, and 
X is the lower digit of fhe buffer code. For 
example. TX225.64 will program the function 
keys to produce codes from 64 upwards. 
Hence, the Print key will generate ASCII 64 
which is FI will generate 65 ('A'). F2 66 
{'B') etc. Obviously the value of n cannot be 0. 
1 or 2. because these values are used to 
specify the other options. 


DE^ULT VALUES, 

The de 


iefault settings for the function keys 
are shown in table 3. This means that the 


function keys on their own will be expanded 
into the programmed strings, while aJI the other 
combinations will produce single byte codes 
(e.g. S(81-S(89 for Shift FI to Shift F9) except 
for Print and F1-F9 pressed in conjunction with 
Shift and Ctrl, which will be totally ignored. 

CURSOR KEYS 
You may have 
noticed that the 
cursor keys (the 
arrow keys and 
Copy) also appear 
in table 1. in the 
same group as the 
basic function 
keys. HoweveMhe 
behaviour of the 
cursor keys is 
slightly more 
complex. Normally 
the cursor keys don't cause any value to be 
entered into the keyboard buffer at all. Instead, they 
move the input cursor around the screen and Copy 
'picks up' the character below the cursor. Their 
operation can, however, be modified by using the 
command ‘FX4: 

*FX4 0 Normal operation 
"FX4 1 Generate fixed codes 

*FX4 2 Act as function keys 

The first of these is the default 'editing' 
mode described above. The second mode of 
operation causes the cursor keys to return fixed 
codes regardless of whether Shift and/or Ctrl 
are pressed. These codes are: 

Copy 135(a87) 

Left 136 (aSS) 

Right 137 (a89) 

Down 138{a8A) 

Up 139 (aSB) 

In the third mode* the cursor keys behave 
just like function keys, adopting the buffer 
codes listed in table 1. 

Finally, the best way to learn how to make 
best use of the function keys is to experiment 
with various settings of ■'FX221-228 and 
investigate the codes produced, perhaps using 
the simple program given earlier. cn 
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Range 

Action 

&.a0-8c8F 

1 

6^90-&9F 

SiBQ 

&A0-S;AF 

mo 

&B0-&BF 

0 

&C0-&CF 

1 

&D0-&DF 

a DO 

S(F0-&EF 

&E0 

&F0-&FF 

e^Fo 


Table 3. Default seHings 
for function keys 
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ARE YOU GOOD ENOUGH? 

As the leaders in software for the Archimedes range of computers, CLARES 
MICRO SUPPLIES are looking to extend our range even further. We are 
looking for people who are as excited by the Archimedes as we are. 

If you have written any programs, completed or not, then we would like 

to hear from you. 

if you have any ideas for programs and have the ability to execute the 
ideas then we want to hear from you. 

If you have the ability to program the Archimedes but not the ideas to 
program then we want to hear from you, 

Programs can be written in any language as long as they perform their 
stated task. Mony of our programs contain large chunks of BASIC with 
ARM code in the oreas that it is needed, BASIC on the Archimedes is a 
very powerful languoge and we do not attach any snob value to its use. If 
your program does what is meant to do then thats all we are interested in. 
Why not join the top team on the Archimedes, You get the support of our 
in-house team, privileged access through us to Acorn and invitations to 
our informal programmers seminars. 

The most important point is that you will be earning top royalty rates of if 
you prefer we will purchase your program outright. 

Please write, in confidence, to Mr. D, Clare at: 

Clares Micro Supplies, 

98 Middlewich Road, 

Northwich, 

CHESHIRE CW9 7DA 

If you have a progrom either complete or in development then please 
enclose a copy for our evaluation. 

To protect yourself we advise that you lodge a copy of the program with 
your bank or solicitor BEFORE you send us a copy. You can then prove 
that your program pre-dates anything that we have. 

Act today and become part of the leading software team producing 
software for the worlds fastest micro. 
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WHICH ASSEMBLER? 
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IS® 


David Spencer explains the role of an assembler, 
and compares two such products now available for the Archimedes. 


An assembler 1$ a piece of software that 
takes an assembly language program {the 
source code), and converts it into the corre¬ 
sponding machine code (the object code) which 
can then be executed directly by the computer. 
Basic V on the Archimedes already contains a 
built-in assembler, and this will probably be ade¬ 
quate for the majority of users writing short to 
medium length machine code programs. Indeed, 
the entire application package for Computer 
Concept's ScanLighl (see review last month) 
was written using Basic’s assembler. 

However, there is one important case when 
the Basic assembler Is not adequate. This is 
when it is desired to assemble a machine code 
program in several sections, and then link them 
together to form a single program. In fact, some 
of the sections may actually be compiled high 
level languages (C or Pascal), rather than hand- 
coded routines. Additionally, but of less impor¬ 
tant, Is the Basic assembler's inability to handle 
the floating point emulator instructions. Both 
these shortcomings are rectified by the two 
assembler packages featured here. 

ASSEMBLER FEATURES 

Before looking at available assemblers, I will 
describe briefly some of the features you would 
expect to find in any Archimedes stand-alone 
assembler 

CONDITIONAL ASSEMBLY 

This feature allows sections of the source 
code to be included, or omitted, when the pro¬ 
gram is assembled. For example, you may wish 
to include some debugging statements In your 
program, but assemble them only if a flag is set 
at the start of the source code. Conditional 
assembly usually takes the form of an 
IF...THEN,„ELSE...ENDIF structure. 

REPETITIVE ASSEMBLY 

This feature allows a section of the source 
code to be assembled a finite number of times. 
This can be very useful in creating data tables 
where each entry is related. 

MACROS 

A Macro is a section of source code which 
only appears in the source listing once, but 


which is used a number of times when the pro¬ 
gram is being assembled. For example, you 
might find that a particular pair of instructions 
appear together at numerous points throughout 
the program. Rather than typing these instruc¬ 
tions in each lime they appear, they can be used 
as the basis of a macro definition, and given a 
name which thereafter can be used to refer to 
those instructions. Each time the name of the 
macro appears as an instruction in the source 
code, it will be replaced at assembly by the indi¬ 
vidual instructions making up the macro. 

Macro definitions can also include parame¬ 
ters which are specified each time the macro is 
used (similar to the arguments of a procedure). 
In this way macros can be used to create pseudo¬ 
instructions which can then be used normally In 
the program. 

LITERAL AREAS 

One limitation of the ARM is its inability to 
include a wide range of immediate operands in 
instructions. This is because of the limited num¬ 
ber of bits free in the instruction field. To get 
around this, constants can be stored in memory 
and loaded using program-relative addressing. 
Some assemblers automatically handle this, 
allowing the user to pretend that a real immedi¬ 
ate constant was used, 

DATA AREA UYOUT 

A nice feature of an assembler is the ability 
to lay out an area of memory to be used as 
workspace automatically. This is done by defin¬ 
ing the start address of the area and then using 
a special operator to allocate a particular sized 
chunk from the area. 

ACORN OBJECT FORMAT 

Acorn object format (AOF) is effectively a 
way of specifying a machine code program 
which is not quite executable. This is because a 
program in AOF format may contain calls to rou¬ 
tines which are not defined within the program, 
and in general the address at which the program 
will be loaded is undefined. To convert an AOF 
program into an executable one. the Acorn 
Linker \s used. This basically takes several AOF 
programs and ties them together, making sure 
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that aEl the routtnes called are defined some¬ 
where within one of the programs. It then saves 
the final executable program. All the Acorn lan¬ 
guage compilers produce AOF output, and any 
assembly language program to be linked into a 
compiled program must therefore also be an 
AOF tile. 

THE ACORN ASSEMBLER 

This was the first Archimedes assembler 
available, and is {and will always be) the defacto 
standard against which others are judged. The 
Acorn assembler is supplied in two versions, 
one to produce stand-alone machine code pro¬ 
grams, and the other to produce AOF files. Both 
versions are very similar, and both offer a very 
large number of functions. It would take too 
much space to discuss all the individual func¬ 
tions, just suffice to say that all the features 
mentioned above are provided. 


1 Product: 

Archimedes Assembler 

Supplier: 

Acorn Computers Ltd., 


Fulbourn Rood, Cherry Hinton, 


Combridge CBl 4JN. 


Tel. (0223) 245200 

1 Price: 

£226.37 (inc, VAT) 


The documentation supplied with the Acorn 
assembler is extensive. It consists of a 177 page 
manual in the same format as that supplied with 
their C compiler. Not only is the assembler itself 
described, but also the ARM processor. Includ¬ 
ing the instruction set of the Floating Point 
Emulator and the co-processor instructions. 
Unfortunately, the disc contains no sample pro¬ 
grams. 

THE WINGPASS MACRO ASSEMBLER 
This is the first afternative to the Acorn sys¬ 
tem. and has been designed with one particular 
application in mind - namely combining C pro¬ 
grams with assembly language routines. This 
system is somewhat more limited than the Acorn 
one, tor example it does not provide the auto¬ 
matic data area facility or the handling of literal 
areas. It does however provide a number of fea¬ 
tures that are solely related to C. For example, it 
is possible to include a C header file within the 
source code, and then refer to type definitions 
within the assembly language program. This 
makes the package ideal for writing functions 


which could not be implemented in C. such as 
routines which must interact directly with hard¬ 
ware. This assembler can be used independent¬ 
ly of C, but in this case a copy of Acorn^s linker 
will be needed. This is supplied with all the lan¬ 
guages. the Acorn assembler, and the Software 
Developer's Toolbox. 


Product: 

Macro Assembler 

Supplier: 

Wingpass Ltd*. 


19 Lincoin Avenue, Twickenham, 

p 

Middlesex TW2 6NH. 

j Price: 

£49.95 Cine* VAT) 


The manual supplied with the Wingpass 
assembler is 72 pages long and contains less 
material than the Acorn one. partly because of 
the fewer features offered* However, the disc 
contains a number of example programs which 
illustrate all the available features, 

CONCLUSION 

When comparing these two assemblers one 
has to consider not only the products them¬ 
selves. but also their prices and the functions 
they aim to perform. There is no doubt that the 
Acorn system offers the most features, and is 
the most flexible. However, this is exactly what It 
is designed to do. and used in conjunction with 
the SoftwarB Devoioper's Tooibox (see RISC 
User Volume 2 Issue 3) provides a complete 
environment lor developing assembly language 
programs. The price of this flexibility is however 
a massive £226, 

On the other hand, the Wingpass assembler, 
while appearing similar at first sight, sefs out to 
perform a totally different function. It is designed 
primarily for incorporating assembly language 
routines into C programs, and hence does for C 
what Basic's assembler does for Basic. The 
Wingpass assembler doesn't possess, and does¬ 
n't need, a number of the functions of the Acorn 
system. However, at £50, it is less than a quarter 
of the price of the Acorn system, and this is a sav¬ 
ing which should not be ignored. 

To summarise, both systems are well written and 
perform their tasks perfectly. However, before 
considering either you should think carefully as 
to whether Basic's assembler would be a suit¬ 
able. and possibly better, alternative. jjjTj 
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ARCHIMEDES SOFTWARE 

(NOWRISC OS compatible) 


SYSTEM DELTAPLUS (v2) £79.95 

This Database Management System is the uitimate 
in simplicity and ffexibiiity. Up to 2 biliion records. 
Muitipie flies open at any time. MultMasking 
allowing one fife to be edited whilst searching 
onother Search by simple selection from 
within windows. Comprehensive moths, 
searches ond sorts. Moiling labels, 
reports, card copier. A 


ATELIER £99.95 

(To be released soon). 

Professional quofity art package. Functions 
Include anti-alfas squashing, rotation 
of areas into any quodrangle. and 
sprite and brush patterning. Further 
features allowTV-slyte 

techniques to even wrap items > 

arour>d 3D surfaces. 

(Multi-tasking if using 
RISC OS.) 


MAILSHOT £39.95 

^ Versatile utility to 

produce malt-merged 
letters and labels across o 
sheet. (This is on add-on 
utility to the System Delta 
Plus dotabase.) 


REPORTER £39.95 

Fully retatlonal user defined 
reporting package. Allows 
sub“ totals and sub-sub^ 
totals. Contains 
facilities than 

dBASE III report WjmM 
writer! (This Is an 
add-on utitity to 
the System / 

DeltaPlus / 

database.) / 


SIGMASHEET £69.95 

Massive fast spreodsheet 
Definable colours, spacing, 
widths, formats, etc. Over 30 moths/ 
stots functions. Vertical/horizon to I 
or automatic calculation modes. 


GAMMAPLOT £69.95 

Extensive presentation graphics/charts 
with art package. Multiple charts/graphs 
on screen anywhere. Pens, shapes, patterns, 
fonts, block options, zoom, slide show faciUty. 
Imports pictures/logos. Merges with Word processors. 


Prices 
inclusive 
oi VAT 


/ / INI R \A ^ 

«9 SIDWEU STREH, EXETER. EX4 «PH 
Tel: (0392) 437756 Fax; (0392) 421762 


Access a 
Barclaycard 
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ROBICO ADVENTURES 

FOR THE ARCHIMEDES 


RISE IN CRIME (Archimedes 305/310/400 £29.95) 

In th# vast galaxy-wide federation^ you are one of the abnormal few; unconditioned, discontented and insubordinate I Can you rid yourself of the 
shackles of this conformist mind-imprisoned society? Rise in Crime boasts over 396K of text 400 individually described locations, 150 objects and 
several high resoiutioo colour graphic screens! Mouse driven input and an advanced parser make this a superb addition to your Archimedes collection! 


FUGITIVE'S QUEST (Archimedes310/400£29.95) 

As Paul Preston, respectable schoolmastern your life is shattered when you are convicted of murder - a crimeyoudid not commit! Set in 1952, against 
the stunnirtg backdrop of southwest England, the hangman's noose awaits unless you escape and find the evidence to clear your namef Fugitive's 
Quest is a large adventure with about 230 locations, 80 objects and reams of well written text. An advanced parser, mouse driven input and several fuU 
colour. phow-guaiitY itiustrations complete the unmistakable feel of Robico quality. 


ENTHAR SEVEN (Archimedes 305/310/400 £29,95} 

It is the distant future ,., Whilst on board a tiny Interplanetary Space Hopper its orbit begins to decay! Once on the planet surface can you escape and 
return, again, to the freedom of the stars? Enthar Seven is a disk based mega-adventuref It has 450 locations, 80 objects, a massive vocabulary and 
1200 messages* And that s just the 8-bit versions! The Archimedes version has over 140K of text and some of the best graphics you'll ever see/ 


You can order by telephone using your ACCESS card, or by cutting out the coupon below. All orders are despatched first class by return. 

------------ 

To: ROBICO, 3 FAIRLAND CLOSE, LLANTRfSANT MID GLAMORGAN CF7 SQH Tel: (0443) 227364 


ADVENTURE 

MODEL 

QTY 

PRICE 

RISEJN CRIME 

ARC 


£29,95 

FUGITIVE'S QUEST 

ARC 


£29,95 

ENTHAR SEVEN 

ARC 


£29,95 


Name ... 
Address 


I enclose a cheque/postal order payable to 'ROBICO' for f 


Signature 


or please debit my ACCESS account: 


Expiry Date 
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David Spencer continues this multi-tasking RISC OS application. 


This month we will add the routines to per¬ 
form text handling and screen update to the 
Notepad. Start by adding this month's listing to 
the ! Run Image program from last month, making 
sure that the original has not been renumbered 
at afl You will find there are still gaps in the line 
numbeiing, and these are for the addition of the 
final part next month. You should also delete line 
570 which was included in last month's listing. 
This line is not in fact needed until next month, 
and at the moment causes spurious errors when 
starting new applications from the Desktop, 

USING THE NOTEPAD 

By now, the Notepad is usabfe to the extent 
that it can function as a jotter, ft is not yet possible 
to ioad or save the contents, or to print them out. 

When you open the Notepad window you 
will see the work area with a line across the top 
and two arrows and the page number above 
this line. The border is a pale yellow to show 
that the window will accept key presses, and a 
red caret can be seen in the top left hand cor¬ 
ner. There are eight pages in all, each with fif¬ 
teen lines of forty characters. You can move 
backwards and forwards through the pages by 
clicking on the arrows, and move the caret 
around the page with the cursor keys, or by 
moving the pointer and clicking. 

There are two modes of text entry - Insert 
and Overtype, Pressing the menu button while 
over the Notepad window will bring up a menu, 
the first two options of which allow you to 
change entry mode. The current mode is shown 
by a tick, the default being Insert. As the names 
suggest, overtype mode causes existing charac¬ 
ters to be overwritten, while insert mode pushes 
characters to the right to fit the new one in. The 
text is totally free format, and inserting a charac¬ 
ter will cause all the text beyond it to be shuffled. 
As text is entered the caret is moved automati¬ 
cally, and running off the end of one page will 
cause the next to be displayed The Return key 
will move the caret to the start of the next line 
without entering any character into the text. 

The Delete key will delete the character to the 
left of the caret. In overtype mode the character 
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is replaced with a space, while in insert mode the 
gap is closed up by moving the remaining text 
back. The Copy key will delete the character to 
the right of the caret, and will always close the 
gap regardless of the entry mode. Finally, the 
Insert key will Insert a space to the right of the 
caret. This is useful for adding one or two charac¬ 
ters without having to enter insert mode. 

As already said, the menu button will bring 
up a menu. The first two options control the 
entry mode as already explained. The third 
option will wipe all the pages of the notepad 
clean and, as no warning is given, should be 
used with care. The fourth and fifth entries are 
'Prinf and 'Save' respectively, and these wifi be 
implemented next month. 

HOW IT WORKS 

The basic structure of the program is very 
similar to that of a normal WIMP based pro¬ 
gram. although there are a few obvious differ¬ 
ences. If you are not familiar with a single task¬ 
ing WIMP program then it is perhaps worth 
reading the series in RISC User Volume 1 
Issues 5 to 7. The best way to understand the 
listing is to work through the program with refer¬ 
ence to both the Programmer's Refererice 
Manual and the notes below. 

The first point to note is the way in which SYS 
■'Wimp^lnitialise" is called In line 170. This is 
called with three parameters. The first Is the ver¬ 
sion number of the oldest Window Manager with 
which this program will work. This should be left 
as 200 In all programs, TTie second parameter is 
a four byte value made up of the characters 
TASK', This tells the Window Manager that this 
program Is multi-tasking. The final parameter is a 
text string which will be used by the Task 
Manager when it displays the table of memory 
usage. This should be kept short, but should give 
a clear indication of the function of the program. 
Finally, the SYS call returns a value which the 
program assigns to the variable task. This is the 
task handle, and is a unique value which the 
Window Manager can use to identify our task. 

The next important stage is the creation of a 
user sprite area in lines 210 to 240. This is 
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essential when using sprites in a multi-tasking 
program, for the reasons discussed last month. 
The program 'peeps' at the sprite file before 
loading it so that the area set up can be exactty 
the right length. You will notice the use of the 
operating system variable <HQlePBd$D\r> in the 
filenames. This is set to the application directory 
pathname by the !Run file, and using it ensures 
that the program will be able to find the sprites 
regardless of the currently selected directory. 

The two RND functions in line 250 ran¬ 
domise where on the screen the Notepad win¬ 
dow will appear when it is first opened. This is 
so that if the program is installed several times, 
and each incarnation opened one after the 
other, all the windows will not stack exactly on 
top of each other. 

The next section of code (tines 260 to 340) 
sets up a number of icons. The Icon worthy of 
mention is that defined in line 280 where the 
icon is placed in window *1. This in fact refers 
to the right-hand side of the iconbar, and it is 
this statement which places the Notepad icon 
on the iconbar. 

The all-important polling loop comes next. 
Again, this is very similar to that of a single¬ 
tasking program. The value passed to 
Wimp_Poll is set to prevent null reason codes 
being returned. Claiming these would slow 
down all the other active tasks. The other major 
change is the recognition of the new reason 
codes 17 and 18 in line 470. These are used to 
signal to our program that another task is send¬ 
ing us a message. Messages are effectively 
just blocks of data, and we will cover them In 
detail next month. For now, all that we need to 
know is that when a message is received, the 
word at offset sixteen in the returned parameter 
block indicates what purpose the message 
serves. The only value we are interested in at 
the moment is zero, which is a message sent 
by the task manager to tell us to shut down. 
This will occur either when the user kills our 
program from the task display, or when the 
Desktop Is about to shut down. Line 550 of the 
program sets our 'Quif flag when this message 
is received. To demonstrate the effect of the 
message, remove this line and try exiting from 
the Desktop. 
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The next section of the program is relativeiy 
standard. One point to note is that whenever the 
Window Manager refers to our icon on the icon- 
bar. it uses a window handle of -2 to represent 
the iconbar. This can be seen in line 930 where 
button presses are detected, and fine 1670 when 
the menus are popped up. Other things to note 
are the dimensions of the menu entries in 
PROCdrawmenu, and the positioning of the 
'Quit' menu in line 1680. These values should be 
used in all multi-tasking programs so that menus 
appear uniform from program to program. 

Lines 2170 to 2220 constitute the error trap¬ 
ping routine. This starts by cancelling any 
active drag box. setting a parameter block to 
contain the error information and then calling 
the routine SYS yVimp_ReponError", This dis¬ 
plays an error box and returns when the user 
clicks on the OK buftton. At this point our pro¬ 
gram jumps back into the polling loop. 

Most of the rest of the program is concerned 
with the text handling. You should note in par¬ 
ticular the key processing routine (PROCkey). 
Any keys which are not recognised must be 
passed back to the Window Manager using 
SYS *Wimp_ProcessKey. This is so that other 
tasks which respond to particular keys can 
react properly. If you remove line 2510. then 
pressing FI 2 to bring up a star prompt wilt no 
longer work if the Notepad has the input focus. 

Finally, PROCretitle closes a window and 
immediately reopens it The purpose of this is 
to update the window title if it has been 
changed (such as a being added when the 
text is modified). 

Next month we wilt add the file handling and 
print routines, and concfude with an explanation 
of some of the more subtle points of the program. 

160 $fi= "Notes'* :mod^FALSE 

190 PROCwipe:insert=TkUE 

200 PROCasserable 

340 void-FWtexticon{main,280,^36,376,- 
4,&7[}00ll9,pno,-l,7} 

450 WHEN S:PROCkey(block) 

820 PROCworkarea 

980 open=TRU E:PROCmov e c a re t 
1000 WHEN main 
1010 CASE b!l6 OF 
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1020 WHEN -l:PROCptitcaret(b) 

1030 WHEN left:IF NOT FNbpage VDU 7 
1040 WHEN rightilF NOT FNfpage VDU 7 
1050 ENDCASE 
1350 : 

1360 DEE PROCworkarea 
1370 ox-block!4-block[20 
1380 oy^block!16“block!24 
1390 MOVE ox,oy“40:DRAW BY 656,0 
1400 ptr-data+page*€00:oy--56:ox+=8 
1410 FOR line=0 TO 14 
1420 IF NOT(block!40<oy-28 OR block!32> 
oy) THEN MOVE ox,oy:Sys "OS_WriteN'', ptr, 
40 

1430 oy^-32:ptr+-40 
1440 NEXT 
1450 ENDFROC 

1520 DEF FNtexticon(window,x0,y0,xl,yl, 
flags,tptr,vptr,len) 

1530 bIock!24-tptr:block!2S^ptr 
1540 block!32=len 

1550 "FNicortblk (window,x0,y0,xl,yl,flag 

s] 

1560 : 

1690 WHEW main:PROCdrawinenu (2, "Note Pad 
, Insert, Over, Clear, Print, Save") 

1700 IF insert THEN 
1720 menu!32=inenu!32 OR 1 
1730 ELSE 

1750 menu!56^enu!56 OR 1 
1760 ENDIF 

1780 SYS "WimpCreateMenu",,menu+4,!b-3 
2,b!4+16 
2070 WHEN 2 
2080 CASE !b OF 
2090 WHEN 0:insert=TRUE 
2100 WHEN 1:insert=FALSE 
2110 WHEN 2:PROCclear 
2120 WHEN 3:PROCprint 
2130 ENDCASE 
2230 : 

2240 DEF PROCputcaret(b) 

2250 x= !b:y-bl 4 : !block^ain 

2260 SYS "WiTnp_GetWindowState",,block 

2270 x=X“block!4+block!20-8 

2280 y-y-blockII6+block!24+56 

2290 IF y>-l6 THEN ENDPROC 

2300 IF y>0 THEN y-0 

2310 IF y<-476 THEN y=-476 

2320 IF x<0 THEN x=0 

2330 IF x>632 THEN x=632 

2340 X={X AND N0T153-I6*( (X AND 15) >7) 


2350 tx-x DIV 16:ty^“y DIV 32 

2360 IF tx-40 AND ty<>14 THEN tx-0:ty+- 

1 

2370 IF tx=40 AND ty^l4 THEN tx-39 
2380 PROCmovecaret 
2390 ENDPROC 
2400 : 

2410 DEF PROCkey(b) 

2420 IF !b-main THEN 
2430 key=b]24 
2440 CASE TRUE OF 

2450 WHEN key^SlBB:PROCdelete(TRUE) 

2460 WHEN key=^fi7F:PROCdelete (FALSE) 

2470 WHEN key-iD:FROCnewline 
2480 WHEN key=SlCD:FROCinsert 
2490 WHEW key<£l00 AND key>iIF:PROCchar 
(key) 

2500 WHEN key>^6l8C AND key<=&I8F:PROCc 
arsor(key-«iieC) 

2510 OTHERWISE SYS "Wimp_ProcessKey", ke 

y 

2520 ENDCASE 
2530 EWDIF 
2540 ENDPROC 
2550 : 

2560 DEF PROCcursor(dir) 

2570 CASE dir OF 
2580 WHEN 0:tx—1 
2590 WHEN lrtx+==l 
2600 WHEN 2:ty+=l 
2610 WHEN 3;ty-=l 
2620 ENDCASE 

2630 IF tx<0 THEN tx-39:ty-=l 

2640 IF tx>39 THEN tx-0;ty+=l 

2650 IF ty<0 THEN ty=-14*FNbpage 

2660 IF ty>14 THEN ty=-14*NOT FNfpage 

2670 PROCmovecaret 

2680 ENDPROC 

2690 : 

2700 DEF FNbpage 
2710 IF page=0 THEN -FALSE 
2720 page-=l:$pno="Page "+STR$(page+1) 
2730 SYS "Wimp_ForceRedraw",main,0,-544 
, 656,0 
2740 =TRUE 
2750 : 

2760 DEF FNfpage 

2770 IF page-maxpage THEN -FALSE 
2780 page+-1:$pno-"Page "+STR$[page+1) 
2790 SYS "WlTnp_ForceRedraw",main, 0,-544 
, 656,0 
2800 =TRUE 
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SILICON VISION 

SOFTWARE FOR THE ARCHIMEDES & BBC 


SolidCAD 


’ - ► I j r r -^3 ^ i D fi/ ((u ij 1 g 5v 5 ifj-t i W ur ^ rcm rec (u ra f sjg n. interior tiestgn. E ngine^amg 

i'. ■' 7f:d‘.r.*nci A s tn pisn, Uont A tdevadons andstso riVrec 

A- IM-1 Lj [f H ij w f^rfui ^: • 'j. 1 i 4 pd rr s far ftr^a^ ton dtaugh ttng and surface 

r< ' l■■■.M 'r,f^3:^h'jp.Mg floddco^oLi/Pb/ecrs. .^^&c^^^c^L^£^e5S^yeep■. ErtfudeS Wacfo 

M •' fiir (pN sigdJng vffiy conipP*?r up}ecl^Da&tty [>espgn5 cfealed wjf/T So^dC^D are 
■ ■: <. j rd . ■ ’ A. [ r [ fi t fltd iitme OiaphtaL angpage tor hj gh - speed Ukket-ir&e anima tion. 

T '■^ ; ty- r'>r'i 4n■ hIrjjt'dn5 i^^i'SJdO aJso per?o^r7TS S/TFOpfd S^tad^rp^ tOr retfPpSJTt- 

irtiCAO^ A<t.) lif.fv? cdfi upgrade Eg. Ede ResHtme Solids ModeUer{Arc} for C40 DO. 

£49.95 (ARC i BBC) New 


REALTIME SOLIDS MODELLER 

■ t, ;..i. tn, p:->'dp..e ^ophJiPcafeddesrgnefTvrronrnen^Of SofJdC4Dancf (he 

-iJP'rir pr.irrFjfipr;. .jpdd^nrjp of a fleafrpme Gfapfircsi.anguagefRGf.>jT7odute 
1 'r.i‘ :P Lj ■- Ri%c code for supercfiajgedpefVo/majK^e. The package rdeaf for 

^ '..'.r rJ. ■..:•< -'^irer-.jroes.gn f OgirTee.rrrtg tfetrgn feachrrtg COT THeRGL 

'■ '. ■' ,\i -./ .t-i) hi L tilrtniinone liicker tf^e ammaiton of de^igna trOfT] Y^ur Cit/vn 

;• I' r^'v.'3^n;r ng rs flfsc ptrforPTied/or ^eaj'rslpc rmages Th/oogh our jn-house 

■ I. j'ii^.gr‘j^sdrtrgn tpeedferhriFQut’s no 0 ffi repackage can crifd fine design 
;.'. 4'-.rr.:,FE■( Ti tot'cd of the Reolhme JJofrds'i AtodefPer 
£89.95 (ARC) New 


REALTiME GRAPHiOS LANGUAGE 

. jj.rcjvHdL's a compPefe .S(j/rd$ Wiffttrantn 

tla> conTPntf^’Oi. and JO £ d.'Eors tor designing nh;er. ^S To aniopdie 
ir;.. a DOfipI ters sec Jjoe gerierafor fo/ ls&t30dfa</vrnq 

t f'lT rirrpaiTjd lurTregrjprjrcs Also Lon-.patihio with 

dCA-.i-atiC. 

£49.95 (BBC) 

SUPER-DUMP 

■• ■ . r ''.iH •■ .'i ' I' .h rt' ■, fj? fhf ;j,ghf?;ir f{i.tinri.j!ftin capaddrfy of 

■ ■ I ij.i ■' ji'r'i irET I IresoluUon PFTagescaoaijjppe 

ij-' i-.'-a. f.i fo^tpi-inlirtg fijh^cijtttpotitfewtthSottdCAO. 

>i. ii.T ii.rH ,j.,j,,- ■ , ti Airjiij di'sjgr; ,H^sEem fi IDC4D ^OpjnaETOr)S|/SEem 

I ■ ft - J'n,''.. ■ ;.r.’LM.irri^iTP CAiJpac f-iige^tan te rndde COJPipdlrpJeMfjfh 

■1 '•. .1 I-^rsrf'ipFF't omrjiand^ Jin etprogra^n rs rnciudfd m fhe 

f T5 95 (BBC), £24.95 (ARC) New 


Presentation Manager 

- ■ ■ ■''■■ ,''c r-rF'-jri. j'^iircfiirrpi-3y r..ai i* I onip.peF 

-‘•■■Fh t . .’.nar.i.'iif it5\^ nunttli-t rpiifih pif/ttuty tut 
^ ■ '■ re If rti, ..lijyil.ttA-;! A.W.nttlL 





£34 95 (BBC), £49 95 (ARC) New 


SJUCON VISION LTD. SIGNAL HOUSB, tVOW ROAD, HARROW 
MtDDLESEXHAI 2AG, TEL:0t-4222274or0l-86f 2173 
FAX: 01-4275169, TELEX: 918286 SiGNAL G. 

E3 (AccessfMastercard/Eurocardaccepted) 

AH prices include VAT and Carriage (Overseas orders add £4). 



ARC-PCB 


The uiumste PCBdcsjgri sysfeni 
devefoped specif tc^iSy Sor the rtrehrmedes 
with a speefhearjon fhaE pannof he 
mafehed, includes Autvm&tic routing. 
Rars-nesfFng. S Tayers. Surface moudf 
capfldFJdy,0 OOJ fesoTudorr, 32 
Fnatpmum hoard sfje. On tine Help, f asf 
Zoom.Pan.ftedfaw, Tejd SSp^kscreen 
facfhfy. Variebfe Line. Pad Texf Gfid si?eS, 
Pan Lfbraries, Bfock Woye Copy Hofafe 
Mirror opbons. and up To 3DD,DOO 
tdfPporrenfs for hardcopy. The sysfem 
supports a targe number of pfotters and 
ordmary Epson oompaEjPte printers a f tfery 
htgh resolutions f 1 J024} of 740 dots 
rnch tor near feser gueijfy output An entry- 
teveiARC PCB syslem (without auto 
routingi fs at’aFiaOte for £'&9.35 f^uto- 
rouirrFg upgrade: C tOO). Enguire about our 
lumkey PC6 design systerns compfefe 
ivrtb Cofour Arefumedes and orprottors 
kVFJb prices troni (■ 1 770 to C79(}91 inc VA T j 

£795.00 ^ARC; New 


RiscBAStC 

S Uperctiarg e ,yo ur 4 r th i rJ K '3 ff.s Ba s re 
j programs by compriirig dst^rir 
I aufomancatty into pure ARM Pisc lultf.' 

■ tviJh the flrscBJiSTCconrpirer, fecir^Fres 

I JneJude HerocaTabie moduJes. Cro\s 

reference of aiJ I'anadfL-s. tunr frons HFiri 
procedures, fluffing point and JntrrgeH 
Support Stand aJOrff? rode generair.u 
OptfrriJng COrrgiIfer 5 f uft runfimn r^F i.. 
bandter 

£99.95 (ARC) New 


RiscFORTH 

4 nnis- 32 PrJ rrripferTFOrrralrun uf ttlC 
fORTh fi3sfanddrd rfasrgrpyrft cf( aJie tutf 
adirarrlage ot the 4P(W arctirfecture 
f eatures me tucfe M u ftr ta i n ^ 

Optimising cuttifitler huiit inAUM 
as serrJbJ^Fr w ffh ftoa fj n y p off p r I n n FaFi 1 mt I', 
fjLJFif Fu f udscreen FcfdrFf rpu^jr^runi 
jnlerfatf OS caiTs suppurf f U>,i!fnt 4 pi </ni 
A integt'/ niaTh-s VYSfiff^ ^vppnii Simp' 
stfcip depupr/er Shadt-FV screerTtdJ 
docunientatron fifo. ft rr>.jrir|ij...j‘rfTjj ■ t 
D i c ti fjrra r i y, ■,.■ ff fj fJ {J dFs;.!' C. rn i 

frnOrng -4r d a Stni J’ai 1 . 1 nr' r" iff tr■ ip m-- r.^- 

£99,95 (ARC) New 
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2810 : 

2820 DEF PROCmovecaret 
2830 SYS "Wlmp_SetCaretPosition”,main,- 
1, tx*l 6+e, -ty*32-8e, 40+ (1«24), 

2840 ENDPROC 
2850 1 

2860 DEF PROCwipe 

2870 FOR ptr=0 TO (maxpage+l)*600^1 STE 
P 4 

2880 data!ptr-620202020 

2890 NEXT:tx=0:ty=0 

2900 page=0i$pno'’’Page ''+STR$ (page+1) 

2910 ENDPROC 

2920 r 

2930 DEF PROCclear 

2940 PROCwipe 

2950 PROCretitle(main) 

2960 SYS "Wimp ForceRedraw",main, 0,-544 
,656,0 

2970 ENDPROC 
2980 : 

2990 DEF PROCchai:(Jcey) 

3000 ptr=^age*600+ty*40+tx 
3010 IF insert THEN 
3020 IF data?4799=ASC" " THEN 
3030 PRCK:shunt(ptr,TRU£) 

3040 data?ptr=key 

3050 SYS "Wimp_ForceRedraw",mairt, 0,-54 4 
,656,-(52+32*ty) 

3060 ELSE VDU7 
3070 ENDIF 
3080 ELSE 
3090 data?ptr=key 

3100 SYS "Wimp_ForceHedraw",main,8+16*t 
x,-<87+32*tyJ,24+l6*tx,-(52+32*ty) 

3110 ENDIF 

3120 PROCmodified 

3130 PROCcursor(l} 

3140 ENDPROC 
3150 : 

3160 DEF PROCshunt(from,dir) 

3170 A%=data+from 

3180 B%=data+(maxpage+l)*600-1 

3190 IF dir THEN C%=1 ELSE C%=-1 

3200 CALL code 

3210 ENDPROC 

3220 ; 

3230 DEF PROCmodified 
3240 IF NOT mod THEN 
3250 mod=TRUE;$mt+=" 

3260 PROCretitletmaln) 

3270 ENDIF 
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3280 ENDPROC 
3290 : 

3300 DEF PROCinsert 

3310 LOCAL insert;insert-TRUE 

3320 PROCchar (32) iPROCCTjrsor(O) 

3330 ENDPROC 
3340 : 

3350 DEF PROCdelete(dir) 

3360 IF NOT{insert OR dir) THEN 
3370 PROCcursor{OJ ;PROCchar (32) 

3380 PROCcursor(0) 

3390 ELSE 

3400 ptr=page*600+ty*40+tx+{dir=FALSE) 
3410 PROCshuntEptr,FALSE) 

3420 data?((maxpage+1)*600-1)=ASC" " 
3430 SYS *’Wimp_ForceRedraw", main, 0,-54 4 
,656,-{52+32*ty) 

3440 IF NOT dir THEN PROCcursor(0) 

3450 IF NOT dir AND tx^39 THEN SYS "Wim 
p_ForceHedraw'’,main, 8 + 16*tx, - E87+32*ty), 
24+16*tx,-(52+32*ty) 

3460 ENDIF 
3470 ENDPROC 
3480 t 

3490 DEF PROCnewline 
3500 tx=OjFROCcursorE2} 

3510 ENDPROC 
3320 ^ 

3530 DEF PROCassemble 

3540 DIM code 200 

3550 FOR pass^O TO 2 STEP 2 

3560 P%=code 

3570 [OPT pass 

3580 \Move (R0)*,,(R1} up/down 1 byte 
3590 MOVS R2,R2:BMr startle 
3600 aoop LDRB R2, [Rl] 

3610 STRB R2,[Rl, #1];SUB Rl,Rl,#l 

3620 CMP R1,R0:BCS loop 

3630 MOV PC,R14 

3640 .startlo LDRB R2, [ROJU 

3650 STRB R2, [R0J:ADD R0,R0J1 

3660 CMP R0,Rl!BLS startlo 

3670 MOV PC,R14 

3680 }NEXT 

3690 ENDPROC 

3700 : 

3710 DEF PROCretitle (Ibloclc) 

3720 SYS "WimpGetWindowState",,block 
3730 SYS "WimpcioseWindow",,block 
3740 SYS ''Mimp_ppenWindow",,block 
3750 PROCmovecaret:open-TRUE 
3760 ENDPROC m 
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OS and BASIC V Guides 


Archimedes Basic Compiler Version 2 • Archimedes Operating System Guide 
BASIC V Guide • Speciai Offers on Archimedes PC Emulator and ANSI C 


ABC Version 2 

Don'l live on promises, buy the only 
true BASIC VConrpilercurrenily avail¬ 
able, a nd now in its second re lease t 
Bui don't take our wofd here's what the 
reviewers said: 

“.^Et^cellent Dabs Press produci Buy 
ffrRlSC User Dec.SB 

"ABC is a v/fa /part of any progra mmer’s 
tooibox, it puts compitefs on other 
systems to s/iame. Ur]questfO nabty one 
of the most fmpressive pieces of soft¬ 
ware I have yet seen running on the 
Archimedes " Dec 1988 

can teii you now, / am very im¬ 
pressed. This is a superb package ." 
Archive Dec t98S 

The above quotes vwere referring to 
Version 1 of ASC - A8C Version 2 is 
even belief! Version 2 allows use of 
double and extended precision float¬ 
ing point, mufiiple exits from proce* 
dures and functions. RETURN parame¬ 
ter passing, new compiler directives 
and very much more. 

As all reviewers have found. ABC 
makes writing machine code programs 
and relocatable riKJdules easy. Pro¬ 
grams can be written using Ihe full 
range of BASIC Vs error messages 
and report s, and once fully working, 
run through ABC which translorms 
them into machine code, ready for 
immediate action, 

D e mo Di sc: We h ave p reduced a d e mo 
disc of ABC which still supports over 
too commands It costs just E2 and 
Ihis Is refundabJe on any subse- 
guentpurchase, A full specification 
sheet is also available on request. 

Free upgrades! E99.95 


Archimedes OS Guide 

Bought RISC OS? Struggling wfith 
Arthur? Then you need our Dabhand 
Guide to the Archimedes Operating 
System This users guide explains how 
the OS works and shows you how to 
get the very best from tt. 

In 320 pages you are introduced to the 
RISC technology before getting down 
to the nitty-gritties. Areas covered 
Include SWls, The CLIJhe filing sys¬ 
tem. the FileSwitch module, Modufes, 
writing applications, the window and 
font managers, sound and voice gen¬ 
eration and the floating point modeJ, 

As with all Dabharid Guides the book 
includes practical examples for you to 
type in any try for yourself. The ac¬ 
companying programs disc contains 
over 40 programs includtr\g several 
not included in the book. 

The price of the guide is just Ct4,95 or 
E2T.3S including the programs disc 
and manual. 

Archimedes Games! 

Arcendium: Board Game Family Fun 
Backgammon, Draughts. Reversi and 
Quadline - four games for the price of 
one! Sure to get the whole family using 
the Archimedes. Just £14.95. 
Alerlon: Arcade Act Ionf 
The highly acclaimed all-action shoot- 
em up for the Archimedes. 256 colour 
mode, with digilised speech. Impos- 
s i ble to I tnishi Su perb fun! P rice £14.9 5. 

C; A Dabhand Guide 

PCW said: "t oniy wish this book had 
been avaitabfe whenf was ieamirtg C ." 
it you want to learn ANSI C then this 
5i2p3gevoiumeisihewaylodoit. At 
£14.95 11 represents quite incredible 
value. Book and programs disc £21.95. 


BASIC V: A Dabhand 
MiniGuide 

For anybody interested in BBC 
BASIC then this book from Beebug 
Editor Mike Williams is essential 
reading. Assuming a familiahly with 
BBC BASIC the various many new 
components of BASIC V are fully 
described using example programs 
throughout. 

an essential aid for atl Archimedes 
owners, and including coverage o1 
RISC OS BASIC, Price £9.95 -128 
pages ■ available end of April. 

Archimedes PC 
Emulator Shareware 

Five discs full of PC software tested 
with the emulator to ensure com^ 
patibility. The collect ion includes 
software you would normally expect 
to pay a fortune for arxJ IrKiludes a 
wordprocessor, spreadsheet, 
games, flowchan designer, printer 
utilities, and more. Price £34.95 

SPECIAL OFFERS! 

PC Emulator & FREE Shareware 
Purchase the Archimedes PC 
Emulator from us and we ll give you 
our Shareware pack-detailed above 
and worth £34.95 - absolutely tree 
of charge. Price just £113.85 inc. 

ANSI C & FREE C Dabhand Guide 
The best combinatk>n1 Purchase 
Acornsolts ANSI C and we'll throw 
in our lop-selling Dabhand Guide to 
C - 512 pages and wonh £14.95. 
Price just £113.85 inc VAT 8 pSp. 


FREE on Request 
Bumper Cataloguel 



5 Victoria Lane [RUAh Whitefieidi Manchoeter MSS SAL 
Teh 061-76G 84S3 BT Gold; 78;MAGi1586 Prestel: 34S&76S10 


=^ricff& include VAT and P&P (UK.^FPO/CI), ACCESS/VIS A accept ed by postrphona/Mailbox/ 
n person. Cheques and POs to address above. Dabs Press products available from alt good 
dealers. Add £2.50 (£12 air} it outside UK. Official orders welcome. 
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This month's Postbag concentrates on readers' 
views about RISC User. 

READERS’ COMMENTS ON RISC USER 

In the December issue of RISC User (Volume 2 Issue 2) I 
noticed with interest a letter from Barbara Wilson pointing 
out that the magazine was too technically oriented. With 
this I agree. For every computer boffin among your read¬ 
ers there must be many others at various levels of knowl¬ 
edge down to absolute beginners. 

With RISC User I would like to see many more short (or 
rather short) utility routines which could be incorporated 
into one's own programs. The Hints & Tips section I would 
like to see enlarged. In general I would like to see more 
space devoted to simpler matters. 

Arthur Cantrlll 

Thanks for a great magazine in RISC User. I am currently 
experimenting with the PC Emulator, but find the manual 
a little short on instructions, especially where PC DOS 
commands are concerned. Would you please run an arti¬ 
cle on these commands? 

Bill Tottle 

As a new computer user (the Archimedes is our first), we 
are especially Interested in articles which introduce us to 
the available software, any new software In the pipeline, 
and general articles to give us some idea of the wide 
range of things which can be performed on this computer. 

I am well aware that at the moment we are just scratching 
the surface. 

In view of this, we find the majority of your articles almost 
incomprehensible, and would appreciate it if you could 
begin some articles with an "idiot's guide", to be skipped 
by those already in the know. Or perhaps you could have 
a section of the magazine especially for people like us 
with limited knowledge of programming. 

Pamela Price 

Most of the recent correspondence, as above, has been 
from RISC User members seeking more introductory and 
explanatory articles in the magazine. VJe are already try- 


ing to respond to the needs of these readers through a 
greater emphasis on applications, and by including more 
introductory articles on the Archimedes, but it should be 
remembered that this is a highly sophisticated, and thus 
sometimes complex system. 

We would also welcome comment from our more techni¬ 
cally minded readers (the boffins as Mr Cantrill phrases 
it). What do they think about RISC User content'^ We feel 
that we have an obligation, which we try to meet, of 
catering for the needs of all Archimedes users, and all 
comment from readers in this respect is welcome. 

VIDEO CAMERAS 

If you are looking for subject matter, may I make a plea on 
behalf of video camera owners like myself. So far the 
majority of software available for video titling has been 
written for the Amiga, and I have been waiting for some¬ 
one to port it over to the Arc. Alas this has not happened. 

I have used the splendid 'Fancy Font’ scroller (Volume 1 
Issue 7) written by Barry Christie. Good as it is. it is not 
that easy to use, especially for non-programmers. I won¬ 
der if the program could be enlarged and made more 
comprehensive. Additional items might be: 

1. Menu driven 

2. Four way scrolling, possibly 3D 

3. Coloured titles (for an Arc with a PAL colour encoder 
module) and B/W titles 

4. The two Acorn fancy fonts at different point sizes. 

5. Extra fonts, fancy or othenivise 

6. To be used with or without genlock 

7. Wipe patterns and fades 

It seems that I am asking a lot and by its complexity too 
long for the magazine, but if it were available as saleable 
software I am sure that there would be a ready market. I 
feel that there is about to be an explosion in the sale of 
video cameras, but unfortunately there is very little post 
production software, and none for the Archimedes. 

R.Follett 

Can anyone help? This seems tike a good opportunity for 
someone with the necessary time and expertise. 
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PIPEDREAM 

POtVfi? AT YOUfi fiNCERTi PS 

PIPEDRtAM 

o The best word processor for tbe Archinie<k5 It has dynamic 
on-screen page breaks, nrrolti-columri text and 'live' embedded 
numbers and calculations 

o Tbe fastest ar>d most powerful spreadsheet for the Archimedes. It 
can sort, format text around numbers anid store and quickly 
recalculate large models 

o The most flexible database for tbe Aichtmedes it ca n store a huge 
number of fields, search, sort and select records and have fields 
which are calculated from other val ues. 

o Complete integration of word processor, spreadsheet and 
database - no need to exchange data between several programs 

o A mail-shot program which can store names ar>d addresses, write 
the letter to send to them and selectively mail to each one. 
including calculations. 

o ideal for writing invoices, statemer^ts and estimates the text and 
figures can fit easily into a pre designed form - and, ot course, the 
figures are live' 

o An excellent way to record customer or sales information: keep a 
database of sales leads, sort it on different criteria, produce the 
required totals and select and print out the key information 

o Compatibility with 4 different computers: the BBC Mkro, the 
Acorn Archimedes, tbe Z88 and the IBM PC. 

o A pull-down menu and help system to make it easy for you to get 
started 

0 Built-in fiie transfer with PipeDream on tbe portable ZEE so that 
you can continue work away frorn your imaiin computer. 

SPELLCHECK 

0 PipeDream SpellCheck is now available, with a dictionary of 
93,003 words and the ability to check over 40,000 words per 
minute on the Archimedes 

VIEW PROFESSIONAL 

o The BBC Micro version of PipeDream which provides complete 
file compatibility with PipeDream and with the 133 and which 
shares many of PipeDream's features 

pjpeDfearrr onfy £99.00ptui VAl Vivw 
Profei^onai £60.00 piui VAT SpoifChcck 
£^3.00pfui VAT 

fb prefer AppOrejm, Vtcw Profession,li or 
^tflCfseek, ot to hnO ouf rnore, cafl us on 0954 
211472 ’r^jy can pay by VfSjA or Access try 
phoning us Wiihyoiifcjfd number. ^ E3 


ffifi crvurtf rf jryy snvo c nr^ray 

PtpeOre^m F> ^nofinsronjf P 

Name 
Address 


PCftt Code 

CCXrON SOFTWAfiE, BROADWAY HCHJSb., 
tJSf-ISl ST NEOTSROAD. MARDWiCK, 
(AMHIilUOI ["in /Oi. fN^LANCJ 


■■ X ** 















rECHNIC^M- QUERIES 




Our regular column dealing with readers* technical questions. 


HARD FACTS 

Dear RISC User. 

There are now a number of hard disc upgrades 
for the 3W, oil appearing to offer similar fea¬ 
tures of vafying prices. Has RISC User tested any 
of these? Also, what interface do these hard 
discs use? Is if SCSI? 

Kevin Long 

RISC User has not as yet published a compara¬ 
tive review of herd disc upgrades, but we may 
do so in a future issue, As you soy, nrx>st appear 
to offer very similar features ond performance. 
The two main criteria that can be used as o 
comparison or© the storage capacity of the 
drive, and the speed of access. This letter value 
is norirally measured by timing a series of stan¬ 
dard benchmark programs which perform vari¬ 
ous file operations. A less obvious difference 
between upgrades is the abilify to support a sec- 
ond hard drive. For exompi©. the Acorn 
upgrade can be extended simply by connect¬ 
ing an additional hard drive to the podule, while 
the Watford Electronics upgrade doesn’t offer 
this feature. It does not foibw, however, that the 
more you pay the nnore features you get, so you 
should study all the optbns before buying. 

On your second point, the interface used by the 
hard drives Is a standard interface called ST506, 
This is basically a hard disc equivalent of the inter¬ 
face used by all floppy disc drives. The poduie 
supplied with the hard disc upgrade contains a 
disc controller which allows the computer to con- 
nect to the 5T506 interface, SCSI (Small 
Computer Systems Interface) is onother interface 
which is found on some hard drives. It offers the 
advantage that it defines a set of commands for 
accessing devices, as well as specifying how 
they ore connected. This means that, for exam¬ 
ple, o hard drive could be repJaced by o tape 
streamer, or even o CD ROM, and the software 
vwll still be obie to access it totally unaware of the 
actuaf hardware present. We believe thot a SCSI 
interface poduie for the Archimedes will be 
releosed in the not too distant future, though no 
details can yet be given. 

David Spencer 
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MASTERING THE DISC MENU 

Dear RISC User 

I have a few questions about the RISC User 
ADFS Menu, t have been using this for some 
time now, but there are one or two things that I 
can‘f get if to do. Firstly if /s infuriofing ihot 
oifhough it will run any file by double-cficking 
on it you cannot just ioad a progrom without 
running It Secondly if seems to hang with a 
read error message when clicking on certain 
file types: and thirdly I have problems making 
out some of the colours in the revised menu, 
ond would prefer o mono screen - Is there a 
way to achieve this. 

Arch Busby 

First of afl there is a way to LOAD a program by 
double-clfcking - Just double-click with the right- 
hand button. You may also be interested to 
know that doubfe-cllcking with the middle but¬ 
ton has a very special effect too, For details, see 
RISC User Volume 1 Issue 3. 

We suspect that your 'hanging' errors are 
caused by clicking on files whose file types 
cause the file to be loaded into RAM at an 
unsuitab!© point, so corrupting the machine s 
stack or whatever, in fact the effect of dou¬ 
ble-clicking (with left or right-hand buttons) 
on any file is not determined by the ADFS 
Menu module at all, but by the aliases set up 
In your machine (either by default or by 
yourself). You can determine what happens 
to ony type of file when you double click 
with the left hand button (i,e. run) or with the 
right hand button (Le. load) by setting up 
run and load aliases. See RISC User Volume 2 
Issued, 

Altering the colours in the new version of the 
ADFS Menu is a relatively easy matter, A short 
orticie in RISC User Volume 2 Issue 1 explains how 
to do it. With 0 little experimentation, you should 
be obie to render the whole menu in blacks, 
whites ond greys. 

Lee Calcroft 

m 
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y/\rchimedes 


PRODUCTS FOR THE 1990's 


NEW P R E S E N T E R S T 0 R Y 



The ultimate in Business Presentation software. Turn your Archimedes into a too! to project combined 
images of Text, Logos, Graphs, Digitised & Video Pictures to illustrate your presentations more clearly. Many 
special screen features are includ^such as vertical and smooth scrolling and bouncing. It can be used with 
most makes of RGB projectors or you can use your Archimedes monitor for smaller Presentations. 
PRESENTER STORY is available for Business applications now. Education and Media/Video versions will be 
available soon. RISCOS compatible. 

£199.00 -h VAT 


P R E S E N T E R ... . : ■ ..-y. :: . 

The established presentation package for Archimedes users in schools and businesses alike. Colour 3-D 
Bar-, Line- and Pie- charts and graphs can be made quickly and easily in the Acorn WIMP environment. 
These charts and graphs can be printed on FX-compatible and Integrex colour printers and also on Plotmate 
plotter. Alternatively, they can be ported into other packages, such as 1st Word Plus, Artisan & Graphic 
Writer. RISCOS compatible. 

£24.95 + VAT 


C 0 N T R 0 L P A N E l ,; 

Confused about the 'tonfigurecomands? With Control Pane! there is no need to worry. Use Control Panel to 
set the right Archimedes* configuration for all your application software. You can then Save and Load the 
configuration settings of your choice for use at later dates. Control Panel also includes a utility to build 
configuration files into program boot files. Fully wimp-driven with constant real-time help screen. 

£14.95 + VAT 


NEW COLOUR C 0 N V E R T E R 


Do you want to capture colour images onto your Archimedes screen? The Colour Converter podule running 
with the Watford Digitiser allows full colour images to be captured and saved as screens or sprites. The 
package also includes new Dithering Software which will give you greatly enhanced near-television quality 
pictures, using an effective palette of256,000colours! The Colour Converter Vi Width Podule and Software 
is available now. 

£169.95 -¥ VAT 


NE W A I M (Ar dwnedes Imag e Mana ger) _ , 

f^blic Domain Image Processing software from Delft University which will increase the contrast and 
sharpen blurred images that have been digitised. Many varied uses—in education, industry and the home. A 
multisync monitor is required in order to give the necessary resolution. 

£9.00 + VAT 



VISA 

and 

ACCESS 


All Ungenudy products are available direct or from good Acorn dealers. 
Educational discounts and site-licences are available. 

For further details please contact us on 098 685477 or write to 










This month's collection of hints and 

DESKTOP SCROLLING 

By RD. White 

When the RISC OS Desktop is started up, it enables the 
scroll protect option. This means that if a character is 
printed in the last cofumn of a line, the cursor is not 
moved on to the next line until the next character is print¬ 
ed. This prevents the screen scrolling when a character is 
printed in the very bottom right-hand comer However, this 
option is [eft on when the Desktop is quit, and it survives 
mode changes. While this will not normally cause prob¬ 
lems. it can with some programs. To turn the scroll protect 
off use: 

VDU 23,16[ 

ALIGN AGAIN 

By David Spencer 

When Basic's built-in assembler aligns the instruction 
pointer a word boundary, either implicitly or using the 
ALIGN directive, it does not pad the skipped bytes with 
any data. This means that if you assemble the same 
source program on two separate occasions, the two 
object codes will m\ necessarily be identical. This won’t 
affect execution of the program in any way, but can pro¬ 
duce confusing results if a bytewise comparison of two 
programs is performed. 

EXTENDED MOUSE 

by Tom Short 

The MOUSE statement in the new RISC OS Basic 
(Version 1.04) has been extended to provide a fourth 
value. 8y using the statement: 

MOUSE x,y,b,t 

X and y will contain the position of the mouse, and b the 
button state, just as before. The new variable t will contain 
a value called the monotonic time. This is a counter which 
starts at zero when the computer is first turned on, and is 
incremented one hundred times a second. It can only be 
reset by turning the computer off. The monotonic time can 
be used to time the delay between mouse dkks to detect 
double clicks, triple clicks etc. 

FINDING FILEINFO 

by tan Taylor 

The format of the display produced by *EX and 'INFO has 
been changed In RISC OS. In particular, they no longer 
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tips fs rounded up by David Spencer, 

give the location on disc of a particular file, and for longer 
files they give the length as a rough number of kilobytes, 
rather than an actual value. To find out the full information 
use the command: 

*FILEINFO <fiienaine> 

This will print out full file information for the named file, or 
in the case of a wlldcarded name, a group of files. The file 
length (in hex} is the first value after the date. 

DISC DEFECTS 

by John Regan 

The new 'E' disc format offered by RISC OS allows 
discs to be used even if they have damaged sectors. 
When the disc is first formatted, it is verified, and if any 
sectors are found not to format, the disc is reformatted 
with those sectors mapped out. The mapped out sec¬ 
tors will appear as free space if the 'MAP command is 
used, and the disc can be used perfectly normally, 
albeit with a reduced capacity. However, it is not possi¬ 
ble to use 'BACKUP to backup onto a disc containing 
defects. 

FILE OPENING 

by Michael Thornton 

Using OPENIN or OPENUP to open a file returns a file 
handle of zero if the file was not found. This handle must 
then be checked, and an error given if appropriate. 
However, if you byp^s OPENIN and OPENUP, and 
instead use the call SYS 'OS_Find', you can force an 
error to be generated if the file is not found. To do this, 
use: 

SYS ''OS Find'",*44,names TO handle 

in place of: 

handle = OPENIN nameS 

and: 

SYS **OS_Find",SC4,name$ TO handle 
instead of: 

handle OPENUP nameS 

DIRECTORY VIEWERS 

by Graeme Davidson 

The RISC 0$ Filer provides a nice feature to allow you to 
traverse a directory tree without ending up with countless 
directory viewers open. Double clicking on a directory In a 
viewer using the Adjust (right-hand) button, will open the 
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new directory, but also close the current viewer. Similarly, 
closing a directory viewer with the Adjust button will re¬ 
open its parent if it is not already visible. Running an 
application with a double-click of Adjust will close the 
viewer before the application is run. 

THE SHARED C LIBRARY 

by David Spencer 

The new release 2 of the Archimedes C compiler 
supports a shared library facility. This allows several 
C programs running simultaneously (multi-tasking 
under RISC OS) to share a common set of library 
routines, so reducing the length of the individual pro¬ 
grams. In order to use this feature, the additional 
parameter "-I arm.clib.o.stubs" should be added to 
the command line when the source code is compiled. 
So, for example: 

cc TestProg 
would become: 

cc TestProg -1 arm. clib.o. stubs 
The additional parameter tells the linker to include the 
object file 'stubs’, rather than the standard library files. 


When linked in this way, the program will only run with 
the shared library installed (otherwise the error 'SWl 
&80060 not known' will result). The shared library mod¬ 
ule has the filename 'Glib’ aruJ can be found in the library 
directory of the C compiler disc, or in the Modules direc¬ 
tory within the iSysfem appiicafton on RISC OS applica¬ 
tions disc number 1. 

SYS FLAGS 

by Glynn Clements 

Most people who have used the SYS statement from 
Basic will know that the contents of registers can be 
returned by using the keyword TO followed by a comma- 
separated list of variable names. It is also possible to read 
the processor flags returned by the call, by placing a vari¬ 
able name preceded by a semicolon after the returned 
variables. For example: 

SYS "OS_RfiadC" TO key ;flags 

The flags are in the form of a four-bit number made up of 
the flags N, Z, G and Y Each flag can be tested individu¬ 
ally using AND. For example; 

IF {flags AND 2) THEN PRINT '^Carry Set" 


Archimedes Macro Assembler Version 2 


The Wingpass Archimedes Macro Assembler rakes ARM assembly language source 
files and produces Acorn Object Formal (AOF) files suitable for linking with other AOF 
files produced by a high level language compiler. 

Features: 


* Accepts the full ARM instruction set including Floating Point instructions. 
Ail FP data types (Float, Double, Extended and Packed) arc supported. 

^ Allows 'C' language header files to be included so definitions of structures, 
unions and #dcfincs need only be done once. 

* Powerful macro facility includes parameter specification by position or by 
name, parameter defaults and variable length parameter lists. 

* Example files supplied include: routines calling and called from 'C routines 
obeying the calling standard, example relocatable module, complete 
Mandelbrot set program. 

£ 49.95 (inc. VAT and P&P) 

Wmgpass Ltd, 19 Lincoln Ave, Twickenham, MIDDX TW2 6NH 
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RISC User 
BINDBRS 

£3.90 + £1 p&p 

BEEBUG Ltd 

Dolphin Piaccp HolyTwell Hill, St* Albans, 
Herts ALl lEX 
Tel. [0727) 40303 


A PARTfAL RENUMBER UTiLm' 

A machine code utility which allows sections of a 
Basic program lo be renumbered individually. 

ARCHIMEDES VISUALS 

A program to rotate wire-frame text in real time. 

UNIVERSAL SCREEN MODE CONVERTER 
A procedure to convert between any two screen 
modes, complete with a sample screen. 

ARC PROCEDURE LIBRARY 
This mo nth, s procedure library provides routines lo 
simplify the decoding of selection boxes. 

MOVIE MAKER STAND-ALONE DISPLAY 
A program to display the delta files produced by the 
RISC User Movie Maker. 


❖ BONUS ITEMS 'l~ 

P1CK-A-PAIR 

A colourful version of the memory game Pelmanism in 
which you turn over cards and iry and match pairs. 

DESKTOP DUSTBIN 

A RISC OS utility that afbws I lies to be deleted simply 
by dragging ihem into a Dustbin. This program has 
been released into the Public Domain by RISC User. 

MULTI-TASKING RAY TRACING DISPLAY 
A multi-tasking program to display the ray traced 'A' 
created by last monih's ray tracing program 

DESIGNER INTRO 

An example of the results ihat can be obtained using 
Designer intro from Techsoft. 

RENDER BENDER ANIMATION 
A sequence of ray traced frames produced using 
Clares' Render Bender, reviewed in this issue, 

ARCSCANDATA 

Index entries for this issue of RISC User and the latest 
BEEBUG (Vol.7 No.10} to be used with Arcscan 


ft ISC Us«r magazlna dlsca ir» avallabis to order, or by subscription. Full details ol prkes elc. in given on the bade cover of each ot RISC User. 


RISC OS SPRITE CALLS Three programs to show how RISC OS can plot scaled sprites, and how screen 
output can be directed into a SDiite. _ 


WRITING A MACHINE CODE UTILITY 
A simple program that demonstrates the basic 
structure ot a machine code utility. 

THE RISC OS NOTEPAD 
Includes pari 2 ot this multi-tasking RISC OS 
application which adds ail the text handling routines 
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I MEMBERSHIP 


RISC User Is availaNa only on subscription at iho rates shown below. Full subscribers to RISC User may also take out 
a reduced rate subscription to SFEBUG (the magazine for the BBC micro and Master series). 

’^'SC USER SUBSCRIPTION RATES RISC USER 

pounds sierfmg. l/Ve wili & BEEBUG 

also accept payment by £14.50 1 vaar (10 issues) UK, BFPO. Ch.l £23,00 

Connect, Access and £20.00 Rest of Europe & Eire £33.00 

Wsa, and offidai UK £25.00 Middle East £40.00 

orders are welcome. £27.00 Americas Africa £44.00 

£29.00 Elsewhere £48.00 

BACK ISSUES 

We intend to mmtain stocks of tack issues New subscribers can thersfora obtain eariier copies to provide a 
compfets set from VoL f tssuo 1. Back issues cost £1.20 each. You should atso inciude postage as shown: 


Destination 
First Issue 

Each subsequent issue 


UK. BFPO, Ch Jc 

60p 

30p 


Europe plus Eire 
£1 
50p 


Elsewhere 

£2 

£l 
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The programs from each issue of RISC User are available on a monthly 3.5' disc This wli be avaifai^e to order, or 
you may take out a sutecr^pfidn to ensure that the disc arrives at the same time as the magazine. The first issue (with 
six programs and animated graphics demo} is at ^e speciai iow price of £3.75. The disc for each issue confains ail the 
programs from the magazine, k^gether with a number of additional items by way of demonsi^affon, all a! the standard 
rate of £4.75, 

Dsc5{<6sGr^ibns kidude postage, but 

MAGAZINE DISC PRICES UK Overseas P"‘'“f 

Sinaia Issue discs £4 75 £ 4 75 mdmrfualonfaspi^ptofaWAiona/ 

^ngi0 a^cs t 4./0 4 /0 die same order} 

Six months subscription ^ 

Twelve months subscription 


UK 

£ 4.75 
£25.50 
£50.00 


Overseas 

£ 4.75 
£30,00 
£56.00 


AT! orders, sotecnjptfoos and odier 
corrasporrdoncd should be 
addressed to.' 



RISC User. Dolphin Place. Holywell Hill. St Albans. Harts ALT lEX, 
Telephone: St Albans (0727)40303 

(24hrs answerphoTTG service for payment by Conryect, Access or Visa card) 









